Metrics for Midpoint on a great circle

start0.0ms (0%)

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

analyze736.0ms (5%)

Memory

-13.8MiB live, 1 077.3MiB allocated; 230ms 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 (39.4%)

Memory

-57.3MiB live, 5 387.3MiB allocated; 2.0s collecting garbage

Samples

4.5s	4 541×	1	valid
725.0ms	3 712×	0	valid
2.0ms	3×	2	valid

Precisions

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

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

ival-mult: 766.0ms (16.1% of total)

ival-sin: 586.0ms (12.3% of total)

adjust: 395.0ms (8.3% of total)

ival-atan2: 332.0ms (7% of total)

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

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

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

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

Bogosity

explain605.0ms (4.1%)

Memory

-25.3MiB live, 421.3MiB allocated; 47ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
70	120	(3.823835566764085e+185 6.407081122341537e-196 -8.722555358317805e-191 2.004957441468728e-277)	0	-	`(sin.f64 (-.f64 lambda1 lambda2))`
70	120	(3.823835566764085e+185 6.407081122341537e-196 -8.722555358317805e-191 2.004957441468728e-277)	0	-	`(cos.f64 (-.f64 lambda1 lambda2))`
5	0	-	1	(6.598591957573853e-196 5834.1564131684845 -2.7882941505229177e-46 -9.891796366970129e-168)	`(+.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	1
`sin.f64`	`(sin.f64 (-.f64 lambda1 lambda2))`	sensitivity	190	1
`+.f64`	`(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))`	cancellation	4	3

Confusion

	Predicted +	Predicted -
+	6	1
-	185	64

Precision

0.031413612565445025

Recall

0.8571428571428571

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	6	1	0
-	185	1	63

Precision?

0.03626943005181347

Recall?

1.0

Freqs

test

number	freq
0	65
1	1
2	187
3	3

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

367.0ms	374×	1	valid
19.0ms	138×	0	valid

Compiler

Compiled 186 to 46 computations (75.3% saved)

Precisions

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

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

ival-sin: 68.0ms (19.2% of total)

adjust: 26.0ms (7.4% of total)

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

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

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

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

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

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

preprocess296.0ms (2%)

Memory

31.6MiB live, 222.0MiB allocated; 22ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

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

Outputs

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

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

Symmetry

(abs phi2)

(abs phi1)

Compiler

Compiled 20 to 14 computations (30% saved)

eval0.0ms (0%)

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

prune0.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

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

Compiler

Compiled 20 to 14 computations (30% saved)

simplify186.0ms (1.3%)

Memory

4.3MiB live, 272.1MiB allocated; 65ms collecting garbage

Localize:

Found 4 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14	81
0	24	81
1	46	81
2	83	81
3	182	81
4	450	81
5	1233	81
6	3580	81
7	7555	81
0	8055	78

Stop Event

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

Calls

Call 1

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

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

localize182.0ms (1.2%)

Memory

8.3MiB live, 205.1MiB allocated; 21ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.1875	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy	0.47560167688565075	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	14.427869388341785	(sin.f64 (-.f64 lambda1 lambda2))

Samples

161.0ms	187×	1	valid
10.0ms	69×	0	valid

Compiler

Compiled 83 to 16 computations (80.7% saved)

Precisions

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

ival-cos: 85.0ms (55.2% of total)

ival-mult: 24.0ms (15.6% of total)

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

adjust: 13.0ms (8.4% of total)

ival-atan2: 8.0ms (5.2% of total)

ival-add: 4.0ms (2.6% of total)

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

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

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

series21.0ms (0.1%)

Memory

-10.2MiB live, 36.3MiB allocated; 3ms collecting garbage

Counts

6 → 65

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
3.0ms	lambda2	@	0	((+ (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 (- lambda1 lambda2)))
2.0ms	lambda1	@	-inf	((+ (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 (- lambda1 lambda2)))
2.0ms	phi1	@	inf	((+ (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 (- lambda1 lambda2)))
2.0ms	lambda1	@	inf	((+ (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 (- lambda1 lambda2)))
2.0ms	phi2	@	inf	((+ (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 (- lambda1 lambda2)))

simplify178.0ms (1.2%)

Memory

35.2MiB live, 206.2MiB allocated; 49ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	295	1639
1	898	1598
2	3235	1539
0	8005	1432

Stop Event

1×	iter limit
1×	node limit

Counts

65 → 65

Calls

Call 1

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

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

rewrite170.0ms (1.1%)

Memory

-6.6MiB live, 185.1MiB allocated; 46ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14	63
0	24	63
1	97	63
2	815	63
0	8215	60

Stop Event

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

Counts

6 → 127

Calls

Call 1

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

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

eval85.0ms (0.6%)

Memory: -3.9MiB live, 53.4MiB allocated; 57ms collecting garbage
Compiler: Compiled 8 694 to 1 035 computations (88.1% saved)

prune52.0ms (0.4%)

Memory

-0.5MiB live, 49.4MiB allocated; 10ms collecting garbage

Pruning

31 alts after pruning (31 fresh and 0 done)

	Pruned	Kept	Total
New	150	31	181
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	151	31	182

Accuracy

99.4%

Counts

182 → 31

Alt Table

Click to see full alt table

Status	Accuracy	Program
	46.3%	(/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)) (.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
	72.7%	(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
	58.5%	(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)))
▶	99.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	89.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	94.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	33.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))) (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
	94.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
	94.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	94.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
▶	99.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))))))
	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)) (cos.f64 lambda2))))))
	78.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 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
▶	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	74.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 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	74.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.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 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
	98.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 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
	98.5%	(+.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))))))
▶	98.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	76.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	78.2%	(+.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))))))
	99.0%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
▶	50.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 3 650 to 1 438 computations (60.6% saved)

simplify161.0ms (1.1%)

Memory

8.8MiB live, 144.5MiB allocated; 27ms collecting garbage

Localize:

Found 17 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	72	1036
0	132	746
1	300	722
2	809	662
3	5596	662
0	8123	649

Stop Event

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

Calls

Call 1

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

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

localize526.0ms (3.6%)

Memory

-12.4MiB live, 496.4MiB allocated; 68ms collecting garbage

Localize:

Found 17 expressions of interest:

New	Metric	Score
accuracy	0.47560167688565075	(+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))))
accuracy	0.49226386722130433	(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	14.427869388341785	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	0.1875	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy	0.47560167688565075	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	29.815307481165156	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1)))
accuracy	0.4922288466743254	(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	14.427869388341785	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	35.61606012803168	#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
accuracy	31.663094181106175	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
accuracy	0.16015625	(.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
accuracy	0.1875	(atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy	0.47560167688565075	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda1 lambda2))

Samples

419.0ms	187×	1	valid
35.0ms	69×	0	valid

Compiler

Compiled 934 to 65 computations (93% saved)

Precisions

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

ival-cos: 158.0ms (39.6% of total)

ival-mult: 59.0ms (14.8% of total)

ival-sin: 52.0ms (13% of total)

adjust: 51.0ms (12.8% of total)

ival-add: 25.0ms (6.3% of total)

ival-atan2: 20.0ms (5% of total)

ival-pow: 13.0ms (3.3% of total)

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

const: 6.0ms (1.5% of total)

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

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

exact: 1.0ms (0.3% of total)

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

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

series98.0ms (0.7%)

Memory

9.4MiB live, 72.2MiB allocated; 33ms collecting garbage

Counts

24 → 188

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
38.0ms	lambda2	@	-inf	((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 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))))) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))) (* (sin (- lambda1 lambda2)) 0) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (* (cos phi2) (sin (- lambda1 lambda2))) (pow (* (cos (- lambda2 lambda1)) 1) 3) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))
8.0ms	phi2	@	0	((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 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))))) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))) (* (sin (- lambda1 lambda2)) 0) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (* (cos phi2) (sin (- lambda1 lambda2))) (pow (* (cos (- lambda2 lambda1)) 1) 3) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))
7.0ms	lambda1	@	inf	((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 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))))) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))) (* (sin (- lambda1 lambda2)) 0) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (* (cos phi2) (sin (- lambda1 lambda2))) (pow (* (cos (- lambda2 lambda1)) 1) 3) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))
6.0ms	lambda2	@	inf	((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 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))))) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))) (* (sin (- lambda1 lambda2)) 0) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (* (cos phi2) (sin (- lambda1 lambda2))) (pow (* (cos (- lambda2 lambda1)) 1) 3) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))
6.0ms	phi2	@	inf	((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 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))))) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))) (* (sin (- lambda1 lambda2)) 0) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (* (cos phi2) (sin (- lambda1 lambda2))) (pow (* (cos (- lambda2 lambda1)) 1) 3) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))

simplify184.0ms (1.2%)

Memory

20.3MiB live, 154.1MiB allocated; 16ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	839	6166
1	2797	5589
0	9101	5219

Stop Event

1×	iter limit
1×	node limit

Counts

188 → 188

Calls

Call 1

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

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

rewrite191.0ms (1.3%)

Memory

0.6MiB live, 180.7MiB allocated; 39ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	70	548
0	128	373
1	544	366
2	4723	366
0	8084	356

Stop Event

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

Counts

24 → 590

Calls

Call 1

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

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

eval173.0ms (1.2%)

Memory: -20.5MiB live, 228.1MiB allocated; 36ms collecting garbage
Compiler: Compiled 54 546 to 4 994 computations (90.8% saved)

prune111.0ms (0.7%)

Memory

12.3MiB live, 105.6MiB allocated; 6ms collecting garbage

Pruning

53 alts after pruning (52 fresh and 1 done)

	Pruned	Kept	Total
New	840	38	878
Fresh	12	14	26
Picked	4	1	5
Done	0	0	0
Total	856	53	909

Accuracy

99.6%

Counts

909 → 53

Alt Table

Click to see full alt table

Status	Accuracy	Program
	46.3%	(/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)) (.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (.f64 (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
	72.7%	(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
	47.3%	(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) lambda1))
	58.5%	(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)))
	89.5%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	61.7%	(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
	78.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	69.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (/.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	33.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))) (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	94.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
▶	94.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
	94.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	94.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
	99.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
	99.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))))))))
	99.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))))))
	65.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))))))
	78.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	74.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
	74.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
	74.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	59.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))))
	65.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal -1 binary64))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64)))))))
	62.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
	98.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 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
	98.5%	(+.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))))))
	71.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) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	60.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	60.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	61.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) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	98.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
▶	94.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	76.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	78.2%	(+.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))))))
▶	61.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	71.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (fma.f64 (/.f64 (neg.f64 (cos.f64 phi2)) lambda1) (/.f64 (sin.f64 lambda2) lambda1) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (cos.f64 lambda2) (/.f64 (cos.f64 phi2) lambda1)))) (.f64 lambda1 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	71.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda2) (.f64 (cos.f64 phi2) (/.f64 (sin.f64 lambda2) lambda1))) (neg.f64 lambda1))) (.f64 lambda1 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	60.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (cos.f64 phi2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	99.1%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
✓	50.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 6 434 to 3 037 computations (52.8% saved)

simplify256.0ms (1.7%)

Memory

-11.1MiB live, 148.6MiB allocated; 98ms collecting garbage

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	71	862
0	128	852
1	222	852
2	502	850
3	1428	807
4	4190	801
0	8808	798

Stop Event

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

Calls

Call 1

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

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

localize569.0ms (3.8%)

Memory

-22.4MiB live, 499.0MiB allocated; 63ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	3.215226710380694	(-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
accuracy	3.2627597275414306	(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	14.427869388341785	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	0.47560167688565075	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	28.74386657232993	#s(approx (cos phi2) #s(literal 1 binary64))
accuracy	29.815307481165156	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1)))
accuracy	0.7907646836040817	(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	14.427869388341785	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	31.357552628599763	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	14.427869388341785	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	28.667286883676802	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy	35.61606012803168	#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
accuracy	0.26953125	(/.f64 (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)
accuracy	0.4870934191394192	(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
accuracy	14.407399220858482	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	14.427869388341785	(sin.f64 (-.f64 lambda1 lambda2))

Samples

427.0ms	198×	1	valid
67.0ms	57×	0	valid
2.0ms	1×	2	valid

Compiler

Compiled 671 to 59 computations (91.2% saved)

Precisions

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

ival-cos: 175.0ms (39.8% of total)

ival-mult: 64.0ms (14.5% of total)

ival-atan2: 63.0ms (14.3% of total)

adjust: 50.0ms (11.4% of total)

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

ival-add: 24.0ms (5.5% of total)

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

ival-pow2: 8.0ms (1.8% of total)

const: 6.0ms (1.4% of total)

ival-div: 6.0ms (1.4% of total)

ival-neg: 2.0ms (0.5% of total)

exact: 1.0ms (0.2% of total)

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

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

series71.0ms (0.5%)

Memory

35.0MiB live, 125.4MiB allocated; 10ms collecting garbage

Counts

27 → 193

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
9.0ms	lambda2	@	-inf	((+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) lambda1) 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) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos 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))) (+ lambda1 (atan2 (* (cos phi2) (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))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (cos phi2) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)))
8.0ms	phi2	@	0	((+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) lambda1) 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) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos 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))) (+ lambda1 (atan2 (* (cos phi2) (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))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (cos phi2) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)))
5.0ms	lambda1	@	inf	((+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) lambda1) 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) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos 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))) (+ lambda1 (atan2 (* (cos phi2) (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))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (cos phi2) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)))
5.0ms	phi2	@	inf	((+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) lambda1) 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) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos 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))) (+ lambda1 (atan2 (* (cos phi2) (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))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (cos phi2) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)))
5.0ms	lambda1	@	-inf	((+ (* (/ (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) lambda1) lambda1) 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) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ (cos 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))) (+ lambda1 (atan2 (* (cos phi2) (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))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (cos phi2) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)))

simplify294.0ms (2%)

Memory

12.0MiB live, 242.1MiB allocated; 62ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	930	9008
1	2749	8704
0	9761	8357

Stop Event

1×	iter limit
1×	node limit

Counts

193 → 193

Calls

Call 1

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

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

rewrite154.0ms (1%)

Memory

-30.4MiB live, 124.9MiB allocated; 15ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	71	593
0	128	552
1	479	536
0	3908	536

Stop Event

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

Counts

27 → 289

Calls

Call 1

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

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

eval135.0ms (0.9%)

Memory: 29.3MiB live, 126.1MiB allocated; 18ms collecting garbage
Compiler: Compiled 30 090 to 2 286 computations (92.4% saved)

prune133.0ms (0.9%)

Memory

-12.2MiB live, 179.6MiB allocated; 18ms collecting garbage

Pruning

67 alts after pruning (66 fresh and 1 done)

	Pruned	Kept	Total
New	459	31	490
Fresh	12	35	47
Picked	5	0	5
Done	0	1	1
Total	476	67	543

Accuracy

99.6%

Counts

543 → 67

Alt Table

Click to see full alt table

Status	Accuracy	Program
	52.7%	(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
	38.6%	(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) lambda1))
	58.5%	(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)))
	89.5%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	61.7%	(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
	78.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	69.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (/.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	33.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))) (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
	94.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (.f64 (+.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	94.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))))
▶	99.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))))))))
	99.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))))))
	65.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))))))
	68.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (pow ( (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64))))))
	73.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (pow ( (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
▶	78.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	74.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
	74.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
	74.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	59.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal -1 binary64))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64)))))))
	62.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
	98.5%	(+.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))))))
	71.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) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	60.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	60.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	61.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) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	61.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	98.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
▶	70.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
	94.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
▶	94.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	72.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	55.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
	72.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))))
	72.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
	76.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	72.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
	76.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
	76.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
	77.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	62.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
	62.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
▶	76.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	78.2%	(+.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))))))
	71.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (fma.f64 (/.f64 (neg.f64 (cos.f64 phi2)) lambda1) (/.f64 (sin.f64 lambda2) lambda1) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (cos.f64 lambda2) (/.f64 (cos.f64 phi2) lambda1)))) (.f64 lambda1 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	71.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda2) (.f64 (cos.f64 phi2) (/.f64 (sin.f64 lambda2) lambda1))) (neg.f64 lambda1))) (.f64 lambda1 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	60.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (cos.f64 phi2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	61.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	52.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	59.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	94.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1) lambda1 lambda1))
	98.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
	58.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 lambda1 lambda1)) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (pow.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 lambda1 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 lambda1 lambda1)) lambda1)))))
✓	50.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 7 682 to 4 049 computations (47.3% saved)

simplify218.0ms (1.5%)

Memory

11.7MiB live, 145.8MiB allocated; 18ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
cost-diff	1	(pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64))
cost-diff	5	(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
cost-diff	0	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1)))
cost-diff	0	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
cost-diff	1	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
cost-diff	0	(cos.f64 phi2)
cost-diff	0	(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff	0	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
cost-diff	0	(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff	0	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
cost-diff	0	(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
cost-diff	0	(atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))))
cost-diff	0	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))))
cost-diff	1	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))
cost-diff	9	(/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	80	1079
0	134	962
1	301	931
2	865	850
3	6254	850
0	8935	835

Stop Event

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

Calls

Call 1

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

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

localize617.0ms (4.2%)

Memory

-19.0MiB live, 601.0MiB allocated; 99ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.41748548840928745	(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
accuracy	11.926666775210943	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	21.126156130554183	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1)))
accuracy	21.6689983921716	#s(approx (cos phi2) #s(literal 1 binary64))
accuracy	0.35468542748330756	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
accuracy	19.419426574250743	#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
accuracy	21.126156130554183	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1)))
accuracy	21.6689983921716	#s(approx (cos phi2) #s(literal 1 binary64))
accuracy	0.27361164817798145	(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
accuracy	11.875152289813862	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	11.926666775210943	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	23.676224114112514	#s(approx (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy	11.875152289813862	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	11.926666775210943	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	20.008662025202618	#s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy	23.544663098529647	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
accuracy	0.3464050781475362	(pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64))
accuracy	0.35468542748330756	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))
accuracy	11.875152289813862	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	11.926666775210943	(cos.f64 (-.f64 lambda2 lambda1))

Samples

418.0ms	136×	1	valid
60.0ms	55×	0	valid
37.0ms	65×	0	invalid

Compiler

Compiled 834 to 73 computations (91.2% saved)

Precisions

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

ival-cos: 189.0ms (45.4% of total)

ival-mult: 50.0ms (12% of total)

adjust: 45.0ms (10.8% of total)

ival-pow: 31.0ms (7.4% of total)

ival-add: 28.0ms (6.7% of total)

ival-atan2: 28.0ms (6.7% of total)

ival-sin: 25.0ms (6% of total)

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

ival-pow2: 4.0ms (1% of total)

ival-div: 4.0ms (1% of total)

ival-sqrt: 3.0ms (0.7% of total)

ival-neg: 2.0ms (0.5% of total)

exact: 1.0ms (0.2% of total)

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

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

series77.0ms (0.5%)

Memory

16.4MiB live, 63.8MiB allocated; 10ms collecting garbage

Counts

29 → 254

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
37.0ms	phi1	@	inf	((/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (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))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))) (pow (cos phi1) 1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (pow (cos (- lambda2 lambda1)) 3) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (cos phi2) (cos (- lambda1 lambda2)))
3.0ms	lambda1	@	-inf	((/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (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))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))) (pow (cos phi1) 1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (pow (cos (- lambda2 lambda1)) 3) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (cos phi2) (cos (- lambda1 lambda2)))
3.0ms	phi2	@	inf	((/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (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))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))) (pow (cos phi1) 1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (pow (cos (- lambda2 lambda1)) 3) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (cos phi2) (cos (- lambda1 lambda2)))
3.0ms	phi2	@	-inf	((/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (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))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))) (pow (cos phi1) 1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (pow (cos (- lambda2 lambda1)) 3) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (cos phi2) (cos (- lambda1 lambda2)))
3.0ms	lambda1	@	inf	((/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (pow (cos (- lambda2 lambda1)) 3) (pow (cos (- lambda2 lambda1)) 2))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (+ (* (* phi2 phi2) -1/2) 1) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1)))))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ (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))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))) (pow (cos phi1) 1/2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2)))) (cos (- lambda2 lambda1)) (sin (- lambda1 lambda2)) (pow (cos (- lambda2 lambda1)) 3) (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (cos phi2) (cos (- lambda1 lambda2)))

simplify207.0ms (1.4%)

Memory

13.7MiB live, 203.1MiB allocated; 55ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	860	8176
1	2619	7929
0	8860	7318

Stop Event

1×	iter limit
1×	node limit

Counts

254 → 254

Calls

Call 1

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

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

rewrite58.0ms (0.4%)

Memory

11.6MiB live, 55.3MiB allocated; 6ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	80	764
0	134	612
0	613	594

Stop Event

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

Counts

29 → 95

Calls

Call 1

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

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

eval80.0ms (0.5%)

Memory: -13.7MiB live, 88.6MiB allocated; 14ms collecting garbage
Compiler: Compiled 21 378 to 1 640 computations (92.3% saved)

prune140.0ms (0.9%)

Memory

-27.8MiB live, 210.4MiB allocated; 17ms collecting garbage

Pruning

71 alts after pruning (69 fresh and 2 done)

	Pruned	Kept	Total
New	327	19	346
Fresh	11	50	61
Picked	4	1	5
Done	0	1	1
Total	342	71	413

Accuracy

99.6%

Counts

413 → 71

Alt Table

Click to see full alt table

Status	Accuracy	Program
	52.7%	(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
	38.6%	(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) lambda1))
	58.5%	(/.f64 (+.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (.f64 lambda1 lambda1)))
	89.5%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	61.7%	(+.f64 lambda1 (atan2.f64 (.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
	78.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	69.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (/.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	33.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))) (.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
	94.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (.f64 (+.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
	94.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	94.3%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))))
	98.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (-.f64 lambda2 lambda1))))))))))
	99.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))))))
	65.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64))))))))
	79.5%	(+.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)) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))))
	68.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (pow ( (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 1 binary64))))))
	73.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (pow ( (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
	74.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	74.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	74.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	78.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	55.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64))) (-.f64 (.f64 (cos.f64 phi1) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 phi1))))))))
	54.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) #s(approx (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (.f64 (.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1)))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal -1 binary64))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))))
	71.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 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64)))))))
	62.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))))))
	98.5%	(+.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))))))
	71.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) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	60.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	76.7%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	60.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	76.4%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2)) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	77.0%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	61.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) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	98.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	70.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (fma.f64 (sqrt.f64 (cos.f64 phi1)) (sqrt.f64 (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
	94.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
✓	94.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	72.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1))) #s(approx (+ ( (pow (cos phi1) 1/2) (pow (cos phi1) 1/2)) (* (cos (- lambda2 lambda1)) (cos phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	76.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 lambda1) (sin.f64 lambda2))))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	55.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
	72.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))))
	72.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
	72.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
	76.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
	76.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
	62.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
	62.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
	76.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	55.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	72.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	55.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	74.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	78.2%	(+.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))))))
	78.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	71.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (fma.f64 (/.f64 (neg.f64 (cos.f64 phi2)) lambda1) (/.f64 (sin.f64 lambda2) lambda1) (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (.f64 (cos.f64 lambda2) (/.f64 (cos.f64 phi2) lambda1)))) (.f64 lambda1 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	71.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda2) (.f64 (cos.f64 phi2) (/.f64 (sin.f64 lambda2) lambda1))) (neg.f64 lambda1))) (.f64 lambda1 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	60.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (cos.f64 phi2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	59.8%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	94.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1) lambda1 lambda1))
	98.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
	58.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 lambda1 lambda1)) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (pow.f64 (.f64 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 lambda1 lambda1)) #s(literal 2 binary64)) (.f64 (.f64 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 lambda1 lambda1)) lambda1)))))
✓	50.5%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Compiler

Compiled 11 295 to 2 956 computations (73.8% saved)

regimes269.0ms (1.8%)

Memory

3.3MiB live, 238.0MiB allocated; 17ms collecting garbage

Counts

120 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes219.0ms (1.5%)

Memory

19.7MiB live, 168.5MiB allocated; 77ms collecting garbage

Counts

71 → 1

Calls

Call 1

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

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:

60.0ms	phi1
48.0ms	lambda1
41.0ms	(cos.f64 phi2)
17.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))))))
17.0ms	phi2

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes99.0ms (0.7%)

Memory

-18.1MiB live, 122.3MiB allocated; 24ms collecting garbage

Counts

48 → 1

Calls

Call 1

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

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes79.0ms (0.5%)

Memory

26.3MiB live, 119.8MiB allocated; 6ms collecting garbage

Counts

44 → 2

Calls

Call 1

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
89.1%	2	`(cos.f64 phi1)`
90.1%	2	`(cos.f64 phi2)`
91.3%	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))))))`
81.2%	2	`lambda1`
89.9%	3	`lambda2`
89.0%	2	`phi1`
90.1%	2	`phi2`

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes24.0ms (0.2%)

Memory

-8.1MiB live, 38.5MiB allocated; 2ms collecting garbage

Counts

43 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

11.0ms	phi2
10.0ms	(cos.f64 phi2)

Results

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

Compiler

Compiled 3 to 9 computations (-200% saved)

regimes24.0ms (0.2%)

Memory

-14.1MiB live, 35.4MiB allocated; 5ms collecting garbage

Counts

40 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

12.0ms	(cos.f64 phi2)
10.0ms	phi2

Results

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

Compiler

Compiled 3 to 9 computations (-200% saved)

regimes46.0ms (0.3%)

Memory

28.8MiB live, 75.5MiB allocated; 3ms collecting garbage

Counts

29 → 2

Calls

Call 1

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
83.4%	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))))))`
83.9%	3	`lambda2`
88.0%	2	`phi1`
88.1%	2	`(cos.f64 phi1)`
88.1%	2	`(cos.f64 phi2)`
88.1%	2	`phi2`

Compiler

Compiled 27 to 36 computations (-33.3% saved)

regimes37.0ms (0.2%)

Memory

-35.5MiB live, 58.3MiB allocated; 4ms collecting garbage

Counts

26 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

8.0ms	(cos.f64 phi1)
7.0ms	lambda2
7.0ms	phi2
7.0ms	phi1
6.0ms	(cos.f64 phi2)

Results

Accuracy	Segments	Branch
83.9%	3	`lambda2`
79.6%	1	`phi1`
82.2%	2	`(cos.f64 phi2)`
82.1%	2	`phi2`
79.6%	1	`(cos.f64 phi1)`

Compiler

Compiled 7 to 22 computations (-214.3% saved)

regimes42.0ms (0.3%)

Memory

39.4MiB live, 85.6MiB allocated; 5ms collecting garbage

Counts

25 → 1

Calls

Call 1

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

Outputs

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 27 to 36 computations (-33.3% saved)

regimes84.0ms (0.6%)

Memory

-14.8MiB live, 108.9MiB allocated; 43ms collecting garbage

Counts

23 → 2

Calls

Call 1

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

Outputs

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

Calls

7 calls:

21.0ms	phi1
19.0ms	(cos.f64 phi1)
18.0ms	(cos.f64 phi2)
6.0ms	lambda2
6.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes7.0ms (0%)

Memory

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

Counts

22 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

5.0ms

(cos.f64 phi2)

Results

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

Compiler

Compiled 2 to 5 computations (-150% saved)

regimes14.0ms (0.1%)

Memory

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

Outputs

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

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes43.0ms (0.3%)

Memory

-41.7MiB live, 15.9MiB allocated; 49ms 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:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

bsearch60.0ms (0.4%)

Memory

3.5MiB live, 51.6MiB allocated; 10ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
56.0ms	0.39249018366901756	1548.2116755291886

Samples

42.0ms	58×	1	valid
8.0ms	70×	0	valid

Compiler

Compiled 1 103 to 581 computations (47.3% saved)

Precisions

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

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

adjust: 9.0ms (19.9% of total)

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

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

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

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

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

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

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

bsearch3.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
2.0ms	0.39249018366901756	1548.2116755291886

Compiler

Compiled 1 679 to 781 computations (53.5% saved)

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	0.39249018366901756	1548.2116755291886

Compiler

Compiled 1 151 to 613 computations (46.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9532723245512861	0.9560304785294844

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch66.0ms (0.4%)

Memory

16.8MiB live, 62.1MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
48.0ms	6.103263221443909e-170	1.1667140000533615e-161
14.0ms	-9.164284982019798e-169	-7.403429085891651e-169

Samples

38.0ms	57×	1	valid
17.0ms	135×	0	valid

Compiler

Compiled 923 to 657 computations (28.8% saved)

Precisions

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

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

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

ival-sin: 5.0ms (10.5% of total)

adjust: 4.0ms (8.4% of total)

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

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

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

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.08110315573202409	0.011555922485682744

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.08110315573202409	0.011555922485682744

Compiler

Compiled 22 to 21 computations (4.5% saved)

simplify58.0ms (0.4%)

Memory

-7.9MiB live, 37.7MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	156	873
1	300	836
2	770	809
3	4389	809

Stop Event

1×	node limit

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 phi2 #s(literal 3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 phi2 #s(literal 3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 phi2 #s(literal 3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 8601875288277647/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 lambda2 #s(literal -6798566308054619/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 364703516796181/8104522595470689372094546608771799123071184047348509570304018222052056272290836223436927829974812098219136497287696853871865529444163623648216552410378835326291370709768573288448 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (cos.f64 phi2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(if (<=.f64 (cos.f64 phi2) #s(literal -3602879701896397/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) #s(approx (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 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)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal -3602879701896397/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) #s(approx (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 phi2 #s(literal 3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))))
(if (<=.f64 phi2 #s(literal 3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi1 phi1) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 phi2 #s(literal 3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 8601875288277647/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(if (<=.f64 lambda2 #s(literal -6798566308054619/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 364703516796181/8104522595470689372094546608771799123071184047348509570304018222052056272290836223436927829974812098219136497287696853871865529444163623648216552410378835326291370709768573288448 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (cos.f64 phi2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(if (or (<=.f64 lambda2 #s(literal -6798566308054619/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) (not (<=.f64 lambda2 #s(literal 364703516796181/8104522595470689372094546608771799123071184047348509570304018222052056272290836223436927829974812098219136497287696853871865529444163623648216552410378835326291370709768573288448 binary64)))) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (cos phi2)) (sin lambda2)) (* (* (cos phi2) (+ (* (* 1/2 lambda1) (sin lambda2)) (cos lambda2))) lambda1)) (.f64 (cos.f64 phi2) lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(if (<=.f64 (cos.f64 phi2) #s(literal -3602879701896397/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) #s(approx (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 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)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal -3602879701896397/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) #s(approx (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal -3602879701896397/72057594037927936 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (/ (+ (pow (* (sin (- lambda1 lambda2)) 0) 3) (pow (* (cos (- lambda2 lambda1)) 1) 3)) (+ (* (* (sin (- lambda1 lambda2)) 0) (* (sin (- lambda1 lambda2)) 0)) (- (* (* (cos (- lambda2 lambda1)) 1) (* (cos (- lambda2 lambda1)) 1)) (* (* (sin (- lambda1 lambda2)) 0) (* (cos (- lambda2 lambda1)) 1))))))) #s(approx (+ (* (+ (* (* phi2 phi2) -1/2) 1) (cos (- lambda1 lambda2))) (cos phi1)) (.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

derivations700.0ms (4.7%)

Memory

23.5MiB live, 473.7MiB allocated; 89ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 071 to 158 computations (85.2% saved)

preprocess125.0ms (0.8%)

Memory

-14.9MiB live, 144.6MiB allocated; 89ms collecting garbage

Remove

(abs phi1)

(abs phi2)

Compiler

Compiled 2 506 to 584 computations (76.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze736.0ms (5%)

sample5.8s (39.4%)

explain605.0ms (4.1%)

preprocess296.0ms (2%)

eval0.0ms (0%)

prune0.0ms (0%)

simplify186.0ms (1.3%)

localize182.0ms (1.2%)

series21.0ms (0.1%)

simplify178.0ms (1.2%)

rewrite170.0ms (1.1%)

eval85.0ms (0.6%)

prune52.0ms (0.4%)

simplify161.0ms (1.1%)

localize526.0ms (3.6%)

series98.0ms (0.7%)

simplify184.0ms (1.2%)

rewrite191.0ms (1.3%)

eval173.0ms (1.2%)

prune111.0ms (0.7%)

simplify256.0ms (1.7%)

localize569.0ms (3.8%)

series71.0ms (0.5%)

simplify294.0ms (2%)

rewrite154.0ms (1%)

eval135.0ms (0.9%)

prune133.0ms (0.9%)

simplify218.0ms (1.5%)

localize617.0ms (4.2%)

series77.0ms (0.5%)

simplify207.0ms (1.4%)

rewrite58.0ms (0.4%)

eval80.0ms (0.5%)

prune140.0ms (0.9%)

regimes269.0ms (1.8%)

regimes219.0ms (1.5%)

regimes99.0ms (0.7%)

regimes79.0ms (0.5%)

regimes24.0ms (0.2%)

regimes24.0ms (0.2%)

regimes46.0ms (0.3%)

regimes37.0ms (0.2%)

regimes42.0ms (0.3%)

regimes84.0ms (0.6%)

regimes7.0ms (0%)

regimes14.0ms (0.1%)

regimes43.0ms (0.3%)

bsearch60.0ms (0.4%)

bsearch3.0ms (0%)

bsearch2.0ms (0%)

bsearch0.0ms (0%)

bsearch66.0ms (0.4%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

simplify58.0ms (0.4%)

derivations700.0ms (4.7%)

preprocess125.0ms (0.8%)

end0.0ms (0%)

Profiling