Metrics for Midpoint on a great circle

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze817.0ms (5%)

Memory

-11.2MiB live, 871.5MiB allocated

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)

sample4.1s (25%)

Memory

58.2MiB live, 5 437.9MiB allocated

Samples

3.0s	4 292×	1	valid
570.0ms	3 954×	0	valid
5.0ms	10×	2	valid

Precisions

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

ival-cos: 1.9s (57.9% of total)

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

ival-atan2: 317.0ms (9.6% of total)

adjust: 218.0ms (6.6% of total)

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

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

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

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

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

Bogosity

explain483.0ms (3%)

Memory

14.0MiB live, 547.1MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
59	134	(-3.8713341286072845e+40 1.4736244206153217e-83 6.80979647031478e-240 2.0623025593504642e-182)	0	-	`(cos.f64 (-.f64 lambda1 lambda2))`
58	135	(-3.8713341286072845e+40 1.4736244206153217e-83 6.80979647031478e-240 2.0623025593504642e-182)	0	-	`(sin.f64 (-.f64 lambda1 lambda2))`
4	1	(1.0384137410174835e-75 -9.98764580999884e+118 3.566638461976004e-280 2.4709808842678023e-241)	3	(1.2606643725984192e+223 -3.250673343712527e-93 -9.74422718071497e+84 2.1578063481762762e-93)	`(+.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	193	1
`sin.f64`	`(sin.f64 (-.f64 lambda1 lambda2))`	sensitivity	193	0
`+.f64`	`(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))`	cancellation	1	6

Confusion

	Predicted +	Predicted -
+	5	2
-	188	61

Precision

0.025906735751295335

Recall

0.7142857142857143

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	5	2	0
-	188	2	59

Precision?

0.03553299492385787

Recall?

1.0

Freqs

test

number	freq
0	63
2	192
3	1

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

250.0ms	360×	1	valid
39.0ms	152×	0	valid

Compiler

Compiled 186 to 46 computations (75.3% saved)

Precisions

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

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

ival-mult: 29.0ms (11.2% of total)

ival-sin: 28.0ms (10.8% of total)

adjust: 24.0ms (9.3% of total)

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

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

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

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

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

preprocess232.0ms (1.4%)

Memory

-39.9MiB live, 81.0MiB allocated

Algorithm

1×	egg-herbie

Rules

498×	`unsub-neg`
446×	`sub-neg`
412×	`distribute-lft-neg-in`
336×	`lower-fma.f64`
336×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	92	294
1	168	287
2	260	285
3	480	285
4	784	285
5	994	285
6	1259	285
7	1523	285
8	1851	285
9	2185	285
10	2611	285
11	2780	285
12	2875	285
13	2915	285
14	2939	285
15	2943	285
16	2943	285
0	14	20
0	24	20
1	30	20
2	35	20
3	41	20
4	50	20
5	74	20
6	113	20
7	152	20
8	221	20
9	274	20
10	362	20
11	397	20
12	426	20
13	490	20
14	529	20
15	548	20
16	568	20
17	590	20
18	606	20
19	609	20
0	609	19

Stop Event

1×	iter limit
1×	saturated
1×	iter limit
1×	saturated

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 lambda2 lambda1)) (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.4MiB live, 0.4MiB allocated
Compiler: Compiled 0 to 4 computations (-∞% saved)

prune2.0ms (0%)

Memory

2.6MiB live, 2.6MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.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))))))

Compiler

Compiled 20 to 14 computations (30% saved)

simplify34.0ms (0.2%)

Memory

5.8MiB live, 45.5MiB allocated

Algorithm

1×	egg-herbie

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

Rules

336×	`lower-fma.f64`
336×	`lower-fma.f32`
224×	`lower-*.f32`
220×	`lower-*.f64`
120×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14	81
0	24	81
1	30	81
2	35	81
3	41	81
4	50	81
5	74	81
6	113	81
7	152	81
8	221	81
9	274	81
10	362	81
11	397	81
12	426	81
13	490	81
14	529	81
15	548	81
16	568	81
17	590	81
18	606	81
19	609	81
0	609	78

Stop Event

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

localize261.0ms (1.6%)

Memory

24.9MiB live, 107.3MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.171875	(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.5220805785457685	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))

Samples

239.0ms	180×	1	valid
10.0ms	76×	0	valid

Compiler

Compiled 83 to 16 computations (80.7% saved)

Precisions

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

ival-cos: 121.0ms (51.8% of total)

ival-sin: 82.0ms (35.1% of total)

ival-mult: 9.0ms (3.9% of total)

adjust: 8.0ms (3.4% of total)

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

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

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

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

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

series92.0ms (0.6%)

Memory

-10.4MiB live, 28.6MiB allocated

Counts

6 → 228

Calls

Call 1

Inputs
#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())

Outputs
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())

Calls

12 calls:

Time	Variable		Point	Expression
71.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	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	@	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	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)))
1.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)))

simplify391.0ms (2.4%)

Memory

-9.2MiB live, 145.7MiB allocated

Algorithm

1×	egg-herbie

Rules

14 730×	`lower-fma.f64`
14 730×	`lower-fma.f32`
4 846×	`lower-*.f64`
4 846×	`lower-*.f32`
4 090×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	230	3176
1	683	3129
2	1899	3074
3	3745	3074
0	8498	2880

Stop Event

1×	iter limit
1×	node limit

Counts

228 → 226

Calls

Call 1

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

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

rewrite331.0ms (2%)

Memory

27.6MiB live, 223.0MiB allocated

Rules

5 196×	`lower-fma.f64`
5 196×	`lower-fma.f32`
4 860×	`lower-*.f32`
4 856×	`lower-*.f64`
3 186×	`lower-/.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14	63
0	24	63
1	82	63
2	574	63
3	6899	63
0	8442	60

Stop Event

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

Counts

6 → 231

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

eval85.0ms (0.5%)

Memory: -26.5MiB live, 174.8MiB allocated
Compiler: Compiled 16 265 to 1 383 computations (91.5% saved)

prune54.0ms (0.3%)

Memory

29.3MiB live, 145.4MiB allocated

Pruning

36 alts after pruning (36 fresh and 0 done)

	Pruned	Kept	Total
New	421	36	457
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	422	36	458

Accuracy

99.3%

Counts

458 → 36

Alt Table

Click to see full alt table

Status	Accuracy	Program
	69.4%	(/.f64 (-.f64 (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 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))
	98.8%	(/.f64 #s(literal 1 binary64) (/.f64 #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)))
	93.9%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	75.5%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	93.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	92.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (fma.f64 (.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 2 binary64))) (neg.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))))))))
	92.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.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)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (neg.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))))))))
	92.6%	(+.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)))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (.f64 (fma.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))))))
▶	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
	92.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.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 (pow.f64 (cos.f64 phi1) #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 (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)))))) (fma.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi1) (-.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))))))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal -1 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.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)))))))
	99.0%	(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
	92.5%	(+.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))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (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)))))))))
▶	98.1%	(+.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))))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	92.6%	(+.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 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
	80.2%	(+.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)))))
	81.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 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	79.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
	75.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 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	80.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
	98.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	98.1%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (.f64 (cos.f64 phi2) (fma.f64 (.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) (+.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))) (.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.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	55.8%	(.f64 (/.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 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (fma.f64 (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)))
	46.3%	(.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (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 6 binary64)))) (fma.f64 (.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (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 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 lambda1)) (pow.f64 lambda1 #s(literal 4 binary64))))
	69.2%	(.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 #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)))
	44.8%	#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))))

Compiler

Compiled 3 136 to 1 504 computations (52% saved)

simplify183.0ms (1.1%)

Memory

-42.2MiB live, 220.1MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

9 400×	`lower-fma.f32`
9 398×	`lower-fma.f64`
4 232×	`lower-*.f32`
4 208×	`lower-*.f64`
2 028×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	64	909
0	116	885
1	178	881
2	303	861
3	693	861
4	1905	861
5	3882	861
6	6940	861
0	8048	849

Stop Event

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

Calls

Call 1

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

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

localize546.0ms (3.4%)

Memory

6.0MiB live, 962.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	4.112962026961674	(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))
accuracy	4.183964201320925	(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	4.449627348794669	(.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
accuracy	12.350667342939305	(sin.f64 (+.f64 lambda2 lambda1))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	0.171875	(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)))))
accuracy	0.5220805785457685	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	26.6666694041126	#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
accuracy	0.5220805785457685	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	26.351136446363604	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy	8.877630782435176	(sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))
accuracy	9.355503995162444	(sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
accuracy	9.449839007424558	(cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda1 lambda2))

Samples

421.0ms	200×	1	valid
49.0ms	54×	0	valid
2.0ms	1×	3	valid
1.0ms	1×	2	valid

Compiler

Compiled 886 to 56 computations (93.7% saved)

Precisions

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

ival-cos: 128.0ms (32.4% of total)

ival-sin: 65.0ms (16.5% of total)

ival-atan2: 47.0ms (11.9% of total)

ival-mult: 41.0ms (10.4% of total)

ival-sub: 32.0ms (8.1% of total)

adjust: 30.0ms (7.6% of total)

ival-add: 17.0ms (4.3% of total)

ival-pow: 16.0ms (4.1% of total)

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

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

exact: 1.0ms (0.3% of total)

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

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

series150.0ms (0.9%)

Memory

23.8MiB live, 179.9MiB allocated

Counts

27 → 1 008

Calls

Call 1

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

Outputs
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (* -1 (/ (cos lambda2) (pow lambda2 2))) (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))) (taylor 0 lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda1 4) (- (/ lambda1 (pow lambda2 3)) (* 1/2 (/ 1 (pow lambda2 2)))))) (taylor 0 lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda1 4) (- (* lambda1 (+ (* -3/2 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (* 1/2 (/ 1 (pow lambda2 2)))))) (taylor 0 lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda1 2) lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 2))) (/ 1 lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* lambda1 (- (/ lambda1 (pow lambda2 3)) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* -1 (* lambda1 (cos lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (/ (cos lambda2) lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (+ (* lambda1 (+ (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2)))) (/ (sin lambda2) lambda2))) (/ (cos lambda2) lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* -1 (* lambda1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (sin lambda2)))) (* -1/2 (* (cos lambda2) (cos phi2))))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos lambda2) 4) (pow (cos phi2) 4))) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -4 (* lambda1 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4))) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4))) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* 4 (* (cos lambda2) (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4))) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)) (/ (* (cos phi2) (- (* (pow lambda2 5) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda2 6)) (pow lambda2 4))))) (pow lambda1 3))))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda2 2) lambda1) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (pow lambda2 2)) lambda1) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))) lambda1) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1 (/ (pow lambda2 5) (pow lambda1 3))) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (* 1/2 (/ (pow lambda2 7) (pow lambda1 3))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))))) lambda1) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda2 5) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))))) lambda1)) (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda2 2) lambda1) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (pow lambda2 2)) (/ (pow lambda2 3) lambda1)) lambda1)) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1)) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 5)) (* 1/2 (pow lambda2 7))) lambda1)) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1)) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (* -1 (/ (cos lambda1) (pow lambda1 2)))))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1/2 (cos lambda1)) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1/2 (cos lambda1)) (* lambda2 (- (/ (cos lambda1) lambda1) (* (sin lambda1) (- 1/6 (/ 1 (pow lambda1 2))))))) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (/ (cos lambda1) lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* lambda2 (+ (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (/ (sin lambda1) lambda1))) (/ (cos lambda1) lambda1))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda2 2) lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ (* lambda2 (- (/ lambda2 (pow lambda1 3)) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ (* lambda2 (- (* lambda2 (+ (* -1 (/ lambda2 (pow lambda1 4))) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* lambda2 (- (* lambda2 (- (* -1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* -1/2 (* (cos phi2) (cos (neg lambda1)))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4))) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (* lambda2 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1)))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4))) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4))) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda1)) (* (sin (neg lambda1)) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))) (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4))) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (+ (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda1 6)) (pow lambda1 4))) (* (pow lambda1 5) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (pow lambda2 3)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))) (taylor inf lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3)))) (taylor inf lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (+ (* -1/2 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* 1/24 (/ (pow lambda1 8) (pow lambda2 4))) (/ (pow lambda1 5) (pow lambda2 3))))))) (taylor inf lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda1 2) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (pow lambda1 2)) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 3))) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (* 1/2 (/ (pow lambda1 7) (pow lambda2 3))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))))) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) lambda2)) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2))) lambda2))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) (* -1 (* (pow lambda1 5) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2)) (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))))) lambda2))) lambda2))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3)))) (taylor -inf lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 6)) (+ (* -1/2 (pow lambda1 6)) (* 1/24 (pow lambda1 8)))) lambda2)) (* -1 (pow lambda1 5))) (pow lambda2 3))) (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))) (taylor -inf lambda2) (#s(alt (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda1 2) lambda2) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (pow lambda1 2)) (/ (pow lambda1 3) lambda2)) lambda2)) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2)) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (* 1/2 (pow lambda1 7))) lambda2)) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2)) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* 1/24 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow phi2 2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* 1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (pow (cos (- lambda2 lambda1)) 4)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (* -5/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* 34/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* 5/3 (pow (cos (- lambda2 lambda1)) 4)))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1/2 (pow phi1 2))) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -2 (pow phi1 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* 5/3 (pow phi1 2)) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 5/3 (* -34/45 (pow phi1 2)))) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 (cos.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi1) (#s(alt (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (patch (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (patch (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) #<representation binary64>) () ())) ())

Calls

12 calls:

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

simplify264.0ms (1.6%)

Memory

-5.7MiB live, 348.5MiB allocated

Algorithm

1×	egg-herbie

Rules

11 636×	`lower-fma.f64`
11 636×	`lower-fma.f32`
7 560×	`lower-*.f64`
7 560×	`lower-*.f32`
4 264×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1013	23063
1	3093	22658
0	8680	21798

Stop Event

1×	iter limit
1×	node limit

Counts

1 008 → 998

Calls

Call 1

Inputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (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)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (* -1 (/ (cos lambda2) (pow lambda2 2))) (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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 (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* 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))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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 (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* 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))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
1
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(+ 1 (* (pow lambda1 4) (- (/ lambda1 (pow lambda2 3)) (* 1/2 (/ 1 (pow lambda2 2))))))
(+ 1 (* (pow lambda1 4) (- (* lambda1 (+ (* -3/2 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (* 1/2 (/ 1 (pow lambda2 2))))))
(/ (pow lambda1 2) lambda2)
(* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 2))) (/ 1 lambda2)))
(* (pow lambda1 2) (+ (* lambda1 (- (/ lambda1 (pow lambda2 3)) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(* (pow lambda1 2) (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(sin lambda2)
(+ (sin lambda2) (* -1 (* lambda1 (cos lambda2))))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (/ (cos lambda2) lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (+ (* lambda1 (+ (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2)))) (/ (sin lambda2) lambda2))) (/ (cos lambda2) lambda2)))))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(sin lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(- (cos phi1) (* (cos lambda2) (cos phi2)))
(- (+ (cos phi1) (* -1 (* lambda1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(- (+ (cos phi1) (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(- (+ (cos phi1) (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (sin lambda2)))) (* -1/2 (* (cos lambda2) (cos phi2))))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(- (pow (cos phi1) 4) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(- (+ (* -4 (* lambda1 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(- (+ (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* 4 (* (cos lambda2) (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)) (/ (* (cos phi2) (- (* (pow lambda2 5) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda2 6)) (pow lambda2 4))))) (pow lambda1 3)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(/ (pow lambda2 2) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (pow lambda2 2)) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1 (/ (pow lambda2 5) (pow lambda1 3))) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (* 1/2 (/ (pow lambda2 7) (pow lambda1 3))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))))) lambda1)
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda2 5) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))))) lambda1)) (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(/ (pow lambda2 2) lambda1)
(* -1 (/ (+ (* -1 (pow lambda2 2)) (/ (pow lambda2 3) lambda1)) lambda1))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 5)) (* 1/2 (pow lambda2 7))) lambda1)) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (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))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (* -1 (/ (cos lambda1) (pow lambda1 2)))))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (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))))
(+ 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1/2 (cos lambda1)) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1/2 (cos lambda1)) (* lambda2 (- (/ (cos lambda1) lambda1) (* (sin lambda1) (- 1/6 (/ 1 (pow lambda1 2))))))) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (/ (cos lambda1) lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* lambda2 (+ (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (/ (sin lambda1) lambda1))) (/ (cos lambda1) lambda1)))))))
(/ (pow lambda2 2) lambda1)
(* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1)))
(* (pow lambda2 2) (+ (* lambda2 (- (/ lambda2 (pow lambda1 3)) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)))
(* (pow lambda2 2) (+ (* lambda2 (- (* lambda2 (+ (* -1 (/ lambda2 (pow lambda1 4))) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(sin lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(- (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(- (+ (cos phi1) (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(- (+ (cos phi1) (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(- (+ (cos phi1) (* lambda2 (- (* lambda2 (- (* -1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* -1/2 (* (cos phi2) (cos (neg lambda1)))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(- (+ (* 4 (* lambda2 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1)))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(- (+ (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda1)) (* (sin (neg lambda1)) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))) (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (+ (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda1 6)) (pow lambda1 4))) (* (pow lambda1 5) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (pow lambda2 3)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
1
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+ 1 (+ (* -1 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (+ (* -1/2 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* 1/24 (/ (pow lambda1 8) (pow lambda2 4))) (/ (pow lambda1 5) (pow lambda2 3)))))))
(/ (pow lambda1 2) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (pow lambda1 2)) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 3))) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (* 1/2 (/ (pow lambda1 7) (pow lambda2 3))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))))) lambda2)
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) (* -1 (* (pow lambda1 5) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2)) (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))))) lambda2))) lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
1
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 6)) (+ (* -1/2 (pow lambda1 6)) (* 1/24 (pow lambda1 8)))) lambda2)) (* -1 (pow lambda1 5))) (pow lambda2 3))) (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))))
(/ (pow lambda1 2) lambda2)
(* -1 (/ (+ (* -1 (pow lambda1 2)) (/ (pow lambda1 3) lambda2)) lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (* 1/2 (pow lambda1 7))) lambda2)) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (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)))))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* 1/24 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (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))))))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (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)))))))))
(+ 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (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))))))))
(+ 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
1
(+ 1 (* -1/2 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(- (cos phi1) (cos (- lambda2 lambda1)))
(- (+ (cos phi1) (* 1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos (- lambda2 lambda1)))
(- (+ (cos phi1) (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1)))
(- (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1)))
(- (pow (cos phi1) 4) (pow (cos (- lambda2 lambda1)) 4))
(- (+ (* 2 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(- (+ (* (pow phi2 2) (- (* -5/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(- (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* 34/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* 5/3 (pow (cos (- lambda2 lambda1)) 4)))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(- 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(- (+ 1 (* -1/2 (pow phi1 2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(- 1 (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (+ 1 (* -2 (pow phi1 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (+ 1 (* (pow phi1 2) (- (* 5/3 (pow phi1 2)) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 5/3 (* -34/45 (pow phi1 2)))) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))

Outputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg 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)))
(+ (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)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (* -1 (/ (cos lambda2) (pow lambda2 2))) (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 phi2)) (-.f64 (/.f64 (cos.f64 lambda2) (.f64 (neg.f64 lambda2) lambda2)) (.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 lambda2 lambda2))) (cos.f64 lambda2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (.f64 lambda1 lambda1) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(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)))
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* 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))))
(fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg 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)))
(+ (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)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* 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))))
(fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg 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)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64))
(+ 1 (* (pow lambda1 4) (- (/ lambda1 (pow lambda2 3)) (* 1/2 (/ 1 (pow lambda2 2))))))
(fma.f64 (-.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 #s(literal 1/2 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 4 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow lambda1 4) (- (* lambda1 (+ (* -3/2 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (* 1/2 (/ 1 (pow lambda2 2))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 4 binary64))) #s(literal -3/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 4 binary64)) #s(literal 1 binary64))
(/ (pow lambda1 2) lambda2)
(/.f64 (*.f64 lambda1 lambda1) lambda2)
(* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 2))) (/ 1 lambda2)))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 lambda1 (.f64 lambda2 lambda2))) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* lambda1 (- (/ lambda1 (pow lambda2 3)) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(.f64 (fma.f64 (-.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (.f64 lambda2 lambda2))) lambda1 (/.f64 #s(literal 1 binary64) lambda2)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 lambda1 (pow.f64 lambda2 #s(literal 4 binary64)))) lambda1 (/.f64 #s(literal -1 binary64) (.f64 lambda2 lambda2))) lambda1 (/.f64 #s(literal 1 binary64) lambda2)) (*.f64 lambda1 lambda1))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* -1 (* lambda1 (cos lambda2))))
(fma.f64 (neg.f64 lambda1) (cos.f64 lambda2) (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (/ (cos lambda2) lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda2)) lambda1 (neg.f64 (cos.f64 lambda2))) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (+ (* lambda1 (+ (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2)))) (/ (sin lambda2) lambda2))) (/ (cos lambda2) lambda2)))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda2)) lambda1 (fma.f64 (sin.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda2))) lambda1 (neg.f64 (cos.f64 lambda2))) lambda1 (sin.f64 lambda2))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg 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)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64) (.f64 (sin.f64 lambda2) #s(literal -1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin 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))
(- (cos phi1) (* (cos lambda2) (cos phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(- (+ (cos phi1) (* -1 (* lambda1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(fma.f64 (neg.f64 (.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(- (+ (cos phi1) (* lambda1 (- (* 1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (cos.f64 phi2) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(- (+ (cos phi1) (* lambda1 (- (* lambda1 (- (* 1/6 (* lambda1 (* (cos phi2) (sin lambda2)))) (* -1/2 (* (cos lambda2) (cos phi2))))) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))
(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 lambda2)) (cos.f64 phi2))) lambda1 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(- (pow (cos phi1) 4) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (+ (* -4 (* lambda1 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(fma.f64 (.f64 #s(literal -4 binary64) (.f64 lambda1 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda2)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(fma.f64 (neg.f64 (fma.f64 (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (fma.f64 (.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda2))))) lambda1 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* 4 (* (cos lambda2) (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos lambda2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (* 4 (* (pow (cos lambda2) 2) (pow (sin lambda2) 2))))))) (* 4 (* (pow (cos lambda2) 3) (* (pow (cos phi2) 4) (sin lambda2)))))) (pow (cos phi1) 4)) (* (pow (cos lambda2) 4) (pow (cos phi2) 4)))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (fma.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (.f64 (sin.f64 lambda2) #s(literal -4/3 binary64))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 lambda2)) (.f64 (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (sin.f64 lambda2)))) (.f64 (fma.f64 (.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))) lambda1 (.f64 (.f64 #s(literal -4 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)) (sin.f64 lambda2)))) lambda1 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))
(.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))))
(fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (*.f64 lambda2 lambda2))) (neg.f64 lambda1)))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2))))
(fma.f64 (.f64 (neg.f64 lambda2) lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda1) (.f64 (cos.f64 phi2) (+.f64 (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (.f64 lambda1 lambda1)) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)) (/ (* (cos phi2) (- (* (pow lambda2 5) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda2 6)) (pow lambda2 4))))) (pow lambda1 3)))))
(fma.f64 (.f64 (neg.f64 lambda2) lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda1) (fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (/.f64 (fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (pow.f64 lambda2 #s(literal 5 binary64)) (.f64 (neg.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal -1/6 binary64) (pow.f64 lambda2 #s(literal 4 binary64)))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (*.f64 lambda1 lambda1))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(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)))
(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)))
(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)))
(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)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(/ (pow lambda2 2) lambda1)
(/.f64 (*.f64 lambda2 lambda2) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (pow lambda2 2)) lambda1)
(/.f64 (fma.f64 lambda2 lambda2 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (neg.f64 lambda1))) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))) lambda1)
(/.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 6 binary64)) lambda1) (/.f64 #s(literal -1/6 binary64) lambda1) (fma.f64 lambda2 lambda2 (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 lambda1 lambda1)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) lambda1)) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1 (/ (pow lambda2 5) (pow lambda1 3))) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (* 1/2 (/ (pow lambda2 7) (pow lambda1 3))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))))) lambda1)
(/.f64 (-.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 6 binary64)) lambda1) (/.f64 #s(literal -1/6 binary64) lambda1) (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 7 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal 1/2 binary64) (fma.f64 lambda2 lambda2 (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 lambda1 lambda1))))) (/.f64 (pow.f64 lambda2 #s(literal 5 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) lambda1)) lambda1)
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))
(.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (*.f64 lambda2 lambda2))) (neg.f64 lambda1)))
(+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda2) lambda2 (.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) lambda1))) (neg.f64 lambda1)))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda2 5) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))))) lambda1)) (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda2) lambda2 (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (neg.f64 (fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (pow.f64 lambda2 #s(literal 5 binary64)) (.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda2 #s(literal 4 binary64)))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))) lambda1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))) (neg.f64 lambda1))) (neg.f64 lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(/ (pow lambda2 2) lambda1)
(/.f64 (*.f64 lambda2 lambda2) lambda1)
(* -1 (/ (+ (* -1 (pow lambda2 2)) (/ (pow lambda2 3) lambda1)) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) lambda1)) (neg.f64 lambda1))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1))
(/.f64 (neg.f64 (fma.f64 lambda2 lambda2 (/.f64 (-.f64 (neg.f64 (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda2 #s(literal 4 binary64)))) lambda1)) lambda1))) (neg.f64 lambda1))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 5)) (* 1/2 (pow lambda2 7))) lambda1)) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1))
(/.f64 (neg.f64 (fma.f64 lambda2 lambda2 (/.f64 (-.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda2 #s(literal 4 binary64)))) (/.f64 (fma.f64 (pow.f64 lambda2 #s(literal 7 binary64)) #s(literal 1/2 binary64) (neg.f64 (pow.f64 lambda2 #s(literal 5 binary64)))) lambda1)) (neg.f64 lambda1)) (pow.f64 lambda2 #s(literal 3 binary64))) lambda1))) (neg.f64 lambda1))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (+ lambda2 (* -1 lambda1))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (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)))
(+ (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))))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (* -1 (/ (cos lambda1) (pow lambda1 2)))))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (fma.f64 (.f64 lambda2 (cos.f64 phi2)) (fma.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda1))) (cos.f64 lambda1) (/.f64 (cos.f64 lambda1) (.f64 lambda1 lambda1))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(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)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (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)))
(+ (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))))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(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)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(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))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin 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))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1/2 (cos lambda1)) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (/.f64 (sin.f64 lambda1) lambda1)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1/2 (cos lambda1)) (* lambda2 (- (/ (cos lambda1) lambda1) (* (sin lambda1) (- 1/6 (/ 1 (pow lambda1 2))))))) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (cos.f64 lambda1) lambda1) (.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda1))) (sin.f64 lambda1))) lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 (sin.f64 lambda1) lambda1)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (/ (cos lambda1) lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda1) lambda1)) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* lambda2 (+ (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (/ (sin lambda1) lambda1))) (/ (cos lambda1) lambda1)))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) (cos.f64 lambda1) (/.f64 (sin.f64 lambda1) lambda1)) lambda2 (fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda1) lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(/ (pow lambda2 2) lambda1)
(/.f64 (*.f64 lambda2 lambda2) lambda1)
(* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1)))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 lambda2 (.f64 lambda1 lambda1))) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* lambda2 (- (/ lambda2 (pow lambda1 3)) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)))
(.f64 (fma.f64 (-.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda1))) lambda2 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* lambda2 (- (* lambda2 (+ (* -1 (/ lambda2 (pow lambda1 4))) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)))
(.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 lambda2 (pow.f64 lambda1 #s(literal 4 binary64)))) lambda2 (/.f64 #s(literal -1 binary64) (.f64 lambda1 lambda1))) lambda2 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 lambda2 lambda2))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin 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))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(fma.f64 (cos.f64 lambda1) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) lambda2 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(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 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(- (cos phi1) (* (cos phi2) (cos (neg lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(- (+ (cos phi1) (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (.f64 lambda2 (cos.f64 phi2)) (neg.f64 (sin.f64 lambda1)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(- (+ (cos phi1) (* lambda2 (- (* 1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(- (+ (cos phi1) (* lambda2 (- (* lambda2 (- (* -1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* -1/2 (* (cos phi2) (cos (neg lambda1)))))) (* -1 (* (cos phi2) (sin (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1))) (cos.f64 phi2) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (+ (* 4 (* lambda2 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1)))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(fma.f64 (.f64 #s(literal 4 binary64) (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (neg.f64 (sin.f64 lambda1))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(fma.f64 (neg.f64 (fma.f64 (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (fma.f64 (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (.f64 (sin.f64 lambda1) (sin.f64 lambda1)) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda1) #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 -4 binary64) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (neg.f64 (sin.f64 lambda1)))))) lambda2 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (pow (cos phi2) 4) (+ (* -4 (* (cos (neg lambda1)) (* (sin (neg lambda1)) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))) (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))))))) (* (pow (cos phi2) 4) (+ (* 2 (* (pow (cos (neg lambda1)) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (* 4 (* (pow (cos (neg lambda1)) 2) (pow (sin (neg lambda1)) 2))))))) (* -4 (* (pow (cos phi2) 4) (* (pow (cos (neg lambda1)) 3) (sin (neg lambda1))))))) (pow (cos phi1) 4)) (* (pow (cos phi2) 4) (pow (cos (neg lambda1)) 4)))
(fma.f64 (fma.f64 (neg.f64 (fma.f64 (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (fma.f64 (.f64 #s(literal -4 binary64) (cos.f64 lambda1)) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1) (pow.f64 (neg.f64 (sin.f64 lambda1)) #s(literal 3 binary64))) (.f64 (.f64 #s(literal 4/3 binary64) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (neg.f64 (sin.f64 lambda1)))) #s(literal 2 binary64))) (.f64 (fma.f64 (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (.f64 (sin.f64 lambda1) (sin.f64 lambda1)) (.f64 (.f64 #s(literal 2 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (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 4 binary64))))) lambda2 (.f64 (.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (neg.f64 (sin.f64 lambda1))))) lambda2 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))
(fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (*.f64 lambda1 lambda1))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)))
(fma.f64 (/.f64 (cos.f64 phi2) lambda2) (/.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) lambda2) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (*.f64 lambda1 lambda1))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (+ (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda1 6)) (pow lambda1 4))) (* (pow lambda1 5) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (pow lambda2 3)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (cos.f64 phi2) (fma.f64 (cos.f64 phi2) (+.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) (.f64 lambda2 lambda2)) (/.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (.f64 (neg.f64 (pow.f64 lambda1 #s(literal 5 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (*.f64 lambda1 lambda1))) lambda2)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (+ (* -1/2 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* 1/24 (/ (pow lambda1 8) (pow lambda2 4))) (/ (pow lambda1 5) (pow lambda2 3)))))))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 lambda2 lambda2)) (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 4 binary64)))) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 8 binary64)) (pow.f64 lambda2 #s(literal 4 binary64))) #s(literal 1/24 binary64) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))))
(/ (pow lambda1 2) lambda2)
(/.f64 (*.f64 lambda1 lambda1) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (pow lambda1 2)) lambda2)
(/.f64 (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (neg.f64 lambda2))) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))) lambda2)
(/.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) lambda2) (/.f64 #s(literal -1/6 binary64) lambda2) (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 lambda2 lambda2)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2)) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 3))) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (* 1/2 (/ (pow lambda1 7) (pow lambda2 3))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))))) lambda2)
(/.f64 (-.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) lambda2) (/.f64 #s(literal -1/6 binary64) lambda2) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 7 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1/2 binary64) (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 lambda2 lambda2))))) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2)) lambda2)
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))
(.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) lambda2))
(fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (*.f64 lambda1 lambda1))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2))) lambda2)))
(neg.f64 (fma.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) lambda2) (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (cos.f64 phi2) (*.f64 lambda1 lambda1))))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) (* -1 (* (pow lambda1 5) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2)) (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))))) lambda2))) lambda2)))
(neg.f64 (fma.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda1) lambda1 (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (fma.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 5 binary64)))) lambda2) (.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) (cos.f64 phi2))) lambda2))) lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 6)) (+ (* -1/2 (pow lambda1 6)) (* 1/24 (pow lambda1 8)))) lambda2)) (* -1 (pow lambda1 5))) (pow lambda2 3))) (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))))
(fma.f64 (/.f64 (-.f64 (neg.f64 (pow.f64 lambda1 #s(literal 5 binary64))) (/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal -3/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 8 binary64)) #s(literal 1/24 binary64))) lambda2)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64)))
(/ (pow lambda1 2) lambda2)
(/.f64 (*.f64 lambda1 lambda1) lambda2)
(* -1 (/ (+ (* -1 (pow lambda1 2)) (/ (pow lambda1 3) lambda2)) lambda2))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2)) (neg.f64 lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (/.f64 (-.f64 (neg.f64 (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) lambda2)) lambda2))) (neg.f64 lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (* 1/2 (pow lambda1 7))) lambda2)) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (/.f64 (-.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) (/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 7 binary64)) #s(literal 1/2 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 5 binary64)))) lambda2)) (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 3 binary64))) lambda2))) (neg.f64 lambda2))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (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))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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)))))))))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(fma.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* 1/24 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(fma.f64 (fma.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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))))))))
(fma.f64 (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (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))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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)))))))))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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))))))))
(fma.f64 (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi2 2)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) (.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(- (cos phi1) (cos (- lambda2 lambda1)))
(-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(- (+ (cos phi1) (* 1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos (- lambda2 lambda1)))
(fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(- (+ (cos phi1) (* (pow phi2 2) (- (* -1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1)))
(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 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(- (+ (cos phi1) (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))) (* -1/2 (cos (- lambda2 lambda1)))))) (cos (- lambda2 lambda1)))
(fma.f64 (fma.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/720 binary64) (.f64 phi2 phi2) #s(literal -1/24 binary64))) phi2) phi2 (.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(- (pow (cos phi1) 4) (pow (cos (- lambda2 lambda1)) 4))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)))
(- (+ (* 2 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(fma.f64 (.f64 #s(literal 2 binary64) (.f64 phi2 phi2)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
(- (+ (* (pow phi2 2) (- (* -5/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(fma.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal -5/3 binary64) (.f64 phi2 phi2) #s(literal 2 binary64))) (*.f64 phi2 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
(- (+ (* (pow phi2 2) (- (* (pow phi2 2) (- (* 34/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 4))) (* 5/3 (pow (cos (- lambda2 lambda1)) 4)))) (* -2 (pow (cos (- lambda2 lambda1)) 4)))) (pow (cos phi1) 4)) (pow (cos (- lambda2 lambda1)) 4))
(fma.f64 (fma.f64 (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (fma.f64 #s(literal 34/45 binary64) (.f64 phi2 phi2) #s(literal -5/3 binary64))) (.f64 phi2 phi2) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 phi2 phi2) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (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)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (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)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(- 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (+ 1 (* -1/2 (pow phi1 2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (.f64 phi1 phi1) #s(literal -1/2 binary64)) (.f64 phi1 phi1) #s(literal 1 binary64)) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- 1 (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (+ 1 (* -2 (pow phi1 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(fma.f64 (.f64 #s(literal -2 binary64) phi1) phi1 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ 1 (* (pow phi1 2) (- (* 5/3 (pow phi1 2)) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(fma.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 5/3 binary64) #s(literal -2 binary64)) phi1) phi1 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(- (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 5/3 (* -34/45 (pow phi1 2)))) 2))) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(fma.f64 (.f64 (fma.f64 (fma.f64 #s(literal -34/45 binary64) (.f64 phi1 phi1) #s(literal 5/3 binary64)) (.f64 phi1 phi1) #s(literal -2 binary64)) phi1) phi1 (-.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4))) (* (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))
(-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))
(- (pow (cos phi1) 4) (* (pow (cos phi2) 4) (pow (cos (- lambda2 lambda1)) 4)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))

rewrite239.0ms (1.5%)

Memory

6.2MiB live, 250.3MiB allocated

Rules

6 196×	`lower-*.f32`
6 172×	`lower-*.f64`
4 172×	`lower-fma.f32`
4 170×	`lower-fma.f64`
3 344×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	64	521
0	116	548
1	414	362
2	3178	338
0	9538	326

Stop Event

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

Counts

27 → 393

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

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

eval370.0ms (2.3%)

Memory: 9.3MiB live, 711.9MiB allocated
Compiler: Compiled 106 536 to 5 261 computations (95.1% saved)

prune128.0ms (0.8%)

Memory

2.9MiB live, 285.3MiB allocated

Pruning

60 alts after pruning (60 fresh and 0 done)

	Pruned	Kept	Total
New	2 255	43	2 298
Fresh	14	17	31
Picked	5	0	5
Done	0	0	0
Total	2 274	60	2 334

Accuracy

99.4%

Counts

2 334 → 60

Alt Table

Click to see full alt table

Status	Accuracy	Program
	51.1%	(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (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))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
	98.8%	(/.f64 #s(literal 1 binary64) (/.f64 #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)))
	93.9%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	75.5%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	74.6%	(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (cos.f64 phi2)) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
▶	99.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	56.4%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (fma.f64 (sqrt.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
	76.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	76.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(approx (sin (+ lambda2 lambda1)) (fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) lambda1) #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(approx (sin (+ lambda2 lambda1)) (fma.f64 (cos.f64 lambda2) lambda1 (sin.f64 lambda2)))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	92.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.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)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (neg.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))))))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 2 binary64) phi1)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
▶	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (.f64 (fma.f64 (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))))))
	92.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 (-.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))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	92.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (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)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	74.2%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 #s(approx (- (cos phi1) ( (cos (- lambda2 lambda1)) (cos phi2))) (-.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	74.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 #s(approx (- (cos phi1) ( (cos (- lambda2 lambda1)) (cos phi2))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (pow.f64 (-.f64 (cos.f64 phi1) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal -1 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (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)))))))))
	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	92.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (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)) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
	92.6%	(+.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 #s(literal 1 binary64) (-.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
▶	81.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 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
	79.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	98.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
	75.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 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	80.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
▶	98.1%	(+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	59.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	87.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) (.f64 phi2 phi2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	77.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	31.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	72.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	49.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sqrt.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
	72.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (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)))))
	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64)))))
	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
	78.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (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.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) (.f64 phi2 phi2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 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))))))
	72.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (.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))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal -1 binary64)))))
	77.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	66.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 (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
	68.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	78.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	64.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
▶	78.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	78.5%	(+.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))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	56.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	73.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	46.3%	(.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (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 6 binary64)))) (fma.f64 (.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (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 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 lambda1)) (pow.f64 lambda1 #s(literal 4 binary64))))
	69.2%	(.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 #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)))
	99.0%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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))
	44.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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))))

Compiler

Compiled 4 186 to 2 426 computations (42% saved)

simplify127.0ms (0.8%)

Memory

13.7MiB live, 130.5MiB allocated

Algorithm

1×	egg-herbie

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

Rules

9 652×	`lower-fma.f32`
9 646×	`lower-fma.f64`
3 494×	`lower-*.f32`
3 472×	`lower-*.f64`
1 492×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	74	909
0	131	891
1	190	891
2	254	891
3	389	859
4	668	855
5	1356	855
6	3117	855
7	7081	855
0	8090	840

Stop Event

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

Calls

Call 1

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

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

localize496.0ms (3.1%)

Memory

-26.9MiB live, 533.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	4.183964201320925	(-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
accuracy	4.27406582079583	(-.f64 (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	26.6666694041126	#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
accuracy	0.171875	(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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
accuracy	0.5220805785457685	(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
accuracy	26.6666694041126	#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
accuracy	29.099279466052792	#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
accuracy	0.4422464242172288	(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	30.293964499695228	#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))))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	24.70054401233944	#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy	26.351136446363604	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy	8.877630782435176	(sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))
accuracy	9.355503995162444	(sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	23.81203667367972	#s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64))

Samples

357.0ms	202×	1	valid
24.0ms	53×	0	valid
1.0ms	1×	2	valid

Compiler

Compiled 742 to 55 computations (92.6% saved)

Precisions

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

ival-cos: 148.0ms (44.9% of total)

ival-sin: 48.0ms (14.6% of total)

ival-mult: 31.0ms (9.4% of total)

adjust: 30.0ms (9.1% of total)

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

ival-add: 20.0ms (6.1% of total)

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

ival-div: 10.0ms (3% of total)

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

ival-neg: 1.0ms (0.3% of total)

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

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

exact: 0.0ms (0% of total)

series187.0ms (1.2%)

Memory

20.7MiB live, 138.5MiB allocated

Counts

31 → 1 200

Calls

Call 1

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

Outputs
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (* -1 (/ (cos lambda2) (pow lambda2 2))) (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (+ (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* 1/6 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))) (taylor 0 lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda1 4) (- (/ lambda1 (pow lambda2 3)) (* 1/2 (/ 1 (pow lambda2 2)))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda1 4) (- (* lambda1 (+ (* -3/2 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (* 1/2 (/ 1 (pow lambda2 2)))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda1 2) lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 2))) (/ 1 lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* lambda1 (- (/ lambda1 (pow lambda2 3)) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* -1 (* lambda1 (cos lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (/ (cos lambda2) lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (+ (* lambda1 (+ (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2)))) (/ (sin lambda2) lambda2))) (/ (cos lambda2) lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (pow (cos phi1) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (pow (cos phi1) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (pow (cos phi1) 2)) (taylor 0 lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) (taylor 0 lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))) (cos phi1)) (taylor 0 lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))) (cos phi1)) (taylor 0 lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))) (cos phi1)) (taylor 0 lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)) (/ (* (cos phi2) (- (* (pow lambda2 5) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda2 6)) (pow lambda2 4))))) (pow lambda1 3))))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda2 2) lambda1) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (pow lambda2 2)) lambda1) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))) lambda1) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1 (/ (pow lambda2 5) (pow lambda1 3))) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (* 1/2 (/ (pow lambda2 7) (pow lambda1 3))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))))) lambda1) (taylor inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda2 5) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))))) lambda1)) (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda2 2) lambda1) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (pow lambda2 2)) (/ (pow lambda2 3) lambda1)) lambda1)) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1)) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 5)) (* 1/2 (pow lambda2 7))) lambda1)) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1)) (taylor -inf lambda1) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)) (taylor -inf lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)) (taylor -inf lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)) (taylor -inf lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)) (taylor -inf lambda1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (* -1 (/ (cos lambda1) (pow lambda1 2)))))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (+ (* -1/6 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1/2 (cos lambda1)) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1/2 (cos lambda1)) (* lambda2 (- (/ (cos lambda1) lambda1) (* (sin lambda1) (- 1/6 (/ 1 (pow lambda1 2))))))) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (/ (cos lambda1) lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* lambda2 (+ (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (/ (sin lambda1) lambda1))) (/ (cos lambda1) lambda1))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda2 2) lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ (* lambda2 (- (/ lambda2 (pow lambda1 3)) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ (* lambda2 (- (* lambda2 (+ (* -1 (/ lambda2 (pow lambda1 4))) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2)) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2)) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2)) (taylor 0 lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda1) (cos phi2)) (cos phi1)) (taylor 0 lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))) (cos phi1)) (taylor 0 lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))) (cos phi1)) (taylor 0 lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))) (cos phi1)) (taylor 0 lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (+ (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda1 6)) (pow lambda1 4))) (* (pow lambda1 5) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (pow lambda2 3)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))) (taylor inf lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3)))) (taylor inf lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (+ (* -1/2 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* 1/24 (/ (pow lambda1 8) (pow lambda2 4))) (/ (pow lambda1 5) (pow lambda2 3))))))) (taylor inf lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda1 2) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (pow lambda1 2)) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 3))) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (* 1/2 (/ (pow lambda1 7) (pow lambda2 3))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))))) lambda2) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) lambda2)) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2))) lambda2))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) (* -1 (* (pow lambda1 5) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2)) (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))))) lambda2))) lambda2))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 6)) (+ (* -1/2 (pow lambda1 6)) (* 1/24 (pow lambda1 8)))) lambda2)) (* -1 (pow lambda1 5))) (pow lambda2 3))) (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))) (taylor -inf lambda2) (#s(alt #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (patch #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (/ (pow lambda1 2) lambda2) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (pow lambda1 2)) (/ (pow lambda1 3) lambda2)) lambda2)) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2)) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (* 1/2 (pow lambda1 7))) lambda2)) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2)) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (patch (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (taylor -inf lambda2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)) (taylor -inf lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)) (taylor -inf lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)) (taylor -inf lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)) (taylor -inf lambda2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* 1/24 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow phi2 2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2)) (- (cos (- lambda1 lambda2)) (cos phi1))) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* (pow phi2 2) (- (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* (pow phi2 2) (- (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2)))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/720 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1))))))))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* 1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor 0 phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (cos (- lambda1 lambda2)) (cos phi1)) (taylor 0 phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (cos phi1)) (taylor 0 phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))) (cos phi1)) (taylor 0 phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (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)))))))) (cos phi1)) (taylor 0 phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (patch (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (patch (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor -inf phi2) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor -inf phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor -inf phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor -inf phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor -inf phi2) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 2/45 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (+ (* -1/2 (/ (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (+ (* -1/24 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/720 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))))) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow phi1 2)) 1) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 1) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 1) (taylor 0 phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) (taylor 0 phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) 1) (taylor 0 phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2))))) 1) (taylor 0 phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24))))) 1) (taylor 0 phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor inf phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor inf phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 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))))) (patch (+.f64 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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))))) (patch (+.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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (patch (+.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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (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) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (patch (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (patch (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (taylor -inf phi1) (#s(alt (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (patch (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor -inf phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor -inf phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor -inf phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)) (taylor -inf phi1) (#s(alt (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (patch (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())

Calls

12 calls:

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

simplify497.0ms (3.1%)

Memory

4.7MiB live, 280.2MiB allocated

Algorithm

1×	egg-herbie

Rules

12 110×	`lower-fma.f64`
12 110×	`lower-fma.f32`
6 464×	`lower-*.f64`
6 464×	`lower-*.f32`
5 378×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1149	27146
1	3470	26625
0	8999	25577

Stop Event

1×	iter limit
1×	node limit

Counts

1 200 → 1 190

Calls

Call 1

Inputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (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)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (* -1 (/ (cos lambda2) (pow lambda2 2))) (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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 (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* 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))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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 (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* 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))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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 (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* 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))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))
(- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))))
(- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))))
(- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (+ (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* 1/6 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
1
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(+ 1 (* (pow lambda1 4) (- (/ lambda1 (pow lambda2 3)) (* 1/2 (/ 1 (pow lambda2 2))))))
(+ 1 (* (pow lambda1 4) (- (* lambda1 (+ (* -3/2 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (* 1/2 (/ 1 (pow lambda2 2))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(/ (pow lambda1 2) lambda2)
(* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 2))) (/ 1 lambda2)))
(* (pow lambda1 2) (+ (* lambda1 (- (/ lambda1 (pow lambda2 3)) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(* (pow lambda1 2) (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(sin lambda2)
(+ (sin lambda2) (* -1 (* lambda1 (cos lambda2))))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (/ (cos lambda2) lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (+ (* lambda1 (+ (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2)))) (/ (sin lambda2) lambda2))) (/ (cos lambda2) lambda2)))))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(+ 1 (* (cos lambda2) (cos phi2)))
(+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2))
(- (+ (* -2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (pow (cos phi1) 2))
(- (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (pow (cos phi1) 2))
(- (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (neg lambda2))) (cos phi1))
(- (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))) (cos phi1))
(- (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))) (cos phi1))
(- (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))) (cos phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)) (/ (* (cos phi2) (- (* (pow lambda2 5) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda2 6)) (pow lambda2 4))))) (pow lambda1 3)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(/ (pow lambda2 2) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (pow lambda2 2)) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1 (/ (pow lambda2 5) (pow lambda1 3))) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (* 1/2 (/ (pow lambda2 7) (pow lambda1 3))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))))) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda2 5) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))))) lambda1)) (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(/ (pow lambda2 2) lambda1)
(* -1 (/ (+ (* -1 (pow lambda2 2)) (/ (pow lambda2 3) lambda1)) lambda1))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 5)) (* 1/2 (pow lambda2 7))) lambda1)) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))
(- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))
(- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))
(- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (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))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (* -1 (/ (cos lambda1) (pow lambda1 2)))))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (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))))
(+ 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(/ (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))
(- (+ (* lambda2 (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda1) (cos phi2)) (cos phi1))))
(- (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda1) (cos phi2)) (cos phi1))))
(- (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (+ (* -1/6 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda1) (cos phi2)) (cos phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1/2 (cos lambda1)) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1/2 (cos lambda1)) (* lambda2 (- (/ (cos lambda1) lambda1) (* (sin lambda1) (- 1/6 (/ 1 (pow lambda1 2))))))) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (/ (cos lambda1) lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* lambda2 (+ (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (/ (sin lambda1) lambda1))) (/ (cos lambda1) lambda1)))))))
(/ (pow lambda2 2) lambda1)
(* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1)))
(* (pow lambda2 2) (+ (* lambda2 (- (/ lambda2 (pow lambda1 3)) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)))
(* (pow lambda2 2) (+ (* lambda2 (- (* lambda2 (+ (* -1 (/ lambda2 (pow lambda1 4))) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(cos (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(+ 1 (* (cos phi2) (cos (neg lambda1))))
(+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(+ 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)))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2))
(- (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(- (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(- (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(- (* (cos lambda1) (cos phi2)) (cos phi1))
(- (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))) (cos phi1))
(- (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))) (cos phi1))
(- (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))) (cos phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (+ (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda1 6)) (pow lambda1 4))) (* (pow lambda1 5) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (pow lambda2 3)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
1
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+ 1 (+ (* -1 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (+ (* -1/2 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* 1/24 (/ (pow lambda1 8) (pow lambda2 4))) (/ (pow lambda1 5) (pow lambda2 3)))))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(/ (pow lambda1 2) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (pow lambda1 2)) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 3))) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (* 1/2 (/ (pow lambda1 7) (pow lambda2 3))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))))) lambda2)
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) (* -1 (* (pow lambda1 5) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2)) (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))))) lambda2))) lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))
1
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 6)) (+ (* -1/2 (pow lambda1 6)) (* 1/24 (pow lambda1 8)))) lambda2)) (* -1 (pow lambda1 5))) (pow lambda2 3))) (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(/ (pow lambda1 2) lambda2)
(* -1 (/ (+ (* -1 (pow lambda1 2)) (/ (pow lambda1 3) lambda2)) lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (* 1/2 (pow lambda1 7))) lambda2)) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))
(- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))
(- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))
(- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (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)))))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* 1/24 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (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))))))))
(+ 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (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))))))))
1
(+ 1 (* -1/2 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (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)))))))))
(+ 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (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))))))))
(/ (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2)) (- (cos (- lambda1 lambda2)) (cos phi1)))
(- (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda1 lambda2)) (cos phi1))))
(- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda1 lambda2)) (cos phi1))))
(- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* (pow phi2 2) (- (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* (pow phi2 2) (- (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2)))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/720 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1))))))))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda1 lambda2)) (cos phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (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)))))))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (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)))))))))
(+ 1 (cos (- lambda2 lambda1)))
(+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(+ 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)))))))))
(- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))
(- (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* 1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (cos (- lambda1 lambda2)) (cos phi1))
(- (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (cos phi1))
(- (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))) (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)))))))) (cos phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (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) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 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))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos 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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))
(- (+ (* (pow phi1 2) (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)))
(- (+ (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)))
(- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 2/45 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (+ (* -1/2 (/ (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (+ (* -1/24 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/720 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))))) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1)
(- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow phi1 2)) 1)
(- (+ (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 1)
(- (+ (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 1)
(- (* (cos phi2) (cos (- lambda1 lambda2))) 1)
(- (+ (* 1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) 1)
(- (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2))))) 1)
(- (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24))))) 1)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos 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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ 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))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos 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 (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))

Outputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg 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)))
(+ (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)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (* -1 (/ (cos lambda2) (pow lambda2 2))) (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (.f64 lambda1 lambda1) (fma.f64 (.f64 lambda1 (cos.f64 phi2)) (-.f64 (/.f64 (cos.f64 lambda2) (.f64 (neg.f64 lambda2) lambda2)) (.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 lambda2 lambda2))) (cos.f64 lambda2))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(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)))
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* 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))))
(fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/6 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* 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))))
(fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg 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)))
(+ (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)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* 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))))
(fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #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 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda2))) (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 lambda2)) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))) (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 lambda2) #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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))))
(fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda2) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))) (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 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))) (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 lambda2) #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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (+ (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* 1/6 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (- (* (cos phi2) (cos (neg lambda2))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda2))) (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 lambda2)) (cos.f64 lambda2))) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (.f64 #s(literal 1/6 binary64) (cos.f64 phi2)) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (neg.f64 (sin.f64 lambda2))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (/.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda2) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))) (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 (/.f64 (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda2) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (/.f64 (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))) (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 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (/.f64 (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (sin.f64 lambda2))) (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 lambda2) #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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64))
(+ 1 (* (pow lambda1 4) (- (/ lambda1 (pow lambda2 3)) (* 1/2 (/ 1 (pow lambda2 2))))))
(fma.f64 (-.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 #s(literal 1/2 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 4 binary64)) #s(literal 1 binary64))
(+ 1 (* (pow lambda1 4) (- (* lambda1 (+ (* -3/2 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (* 1/2 (/ 1 (pow lambda2 2))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 4 binary64))) #s(literal -3/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 4 binary64)) #s(literal 1 binary64))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(/ (pow lambda1 2) lambda2)
(/.f64 (*.f64 lambda1 lambda1) lambda2)
(* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 2))) (/ 1 lambda2)))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) lambda2) (/.f64 lambda1 (.f64 lambda2 lambda2))) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* lambda1 (- (/ lambda1 (pow lambda2 3)) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(.f64 (fma.f64 (-.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (.f64 lambda2 lambda2))) lambda1 (/.f64 #s(literal 1 binary64) lambda2)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* lambda1 (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 4))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)))
(.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 lambda1 (pow.f64 lambda2 #s(literal 4 binary64)))) lambda1 (/.f64 #s(literal -1 binary64) (.f64 lambda2 lambda2))) lambda1 (/.f64 #s(literal 1 binary64) lambda2)) (*.f64 lambda1 lambda1))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* -1 (* lambda1 (cos lambda2))))
(fma.f64 (neg.f64 lambda1) (cos.f64 lambda2) (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (/ (cos lambda2) lambda2))))))
(fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda2)) lambda1 (neg.f64 (cos.f64 lambda2))) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (* -1 (cos lambda2)) (* lambda1 (+ (* -1/2 (sin lambda2)) (+ (* lambda1 (+ (* (cos lambda2) (- 1/6 (/ 1 (pow lambda2 2)))) (/ (sin lambda2) lambda2))) (/ (cos lambda2) lambda2)))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda2)) lambda1 (fma.f64 (sin.f64 lambda2) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda2) lambda2))) lambda1 (neg.f64 (cos.f64 lambda2))) lambda1 (sin.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg 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)))
(+ (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)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg 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)))
(+ (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)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ 1 (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (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) #s(literal 1 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))))
(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) #s(literal 1 binary64)))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/6 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)) (pow (cos phi1) 2))
(-.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ (* -2 (* lambda1 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (pow (cos phi1) 2))
(fma.f64 (.f64 #s(literal -2 binary64) (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (pow (cos phi1) 2))
(fma.f64 (fma.f64 (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda2) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))) lambda1 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* lambda1 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (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 lambda2))) (cos.f64 lambda2) (.f64 (fma.f64 (.f64 (.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) #s(literal 4/3 binary64)) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda2) (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) lambda1)) lambda1 (-.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (neg lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))
(- (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))) (cos phi1))
(fma.f64 (.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(- (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))) (cos phi1))
(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 (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(- (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))) (cos phi1))
(fma.f64 (fma.f64 (sin.f64 lambda2) (cos.f64 phi2) (.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1)) lambda1 (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))
(.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))))
(fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (.f64 (.f64 (.f64 lambda2 lambda2) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (neg.f64 lambda1)))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2))))
(fma.f64 (.f64 (neg.f64 lambda2) lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda1) (.f64 (cos.f64 phi2) (+.f64 (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (.f64 lambda1 lambda1)) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))) lambda1)) (+ (* (cos phi2) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (+ lambda1 lambda2))))))) (pow lambda1 2)) (/ (* (cos phi2) (- (* (pow lambda2 5) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda2 6)) (pow lambda2 4))))) (pow lambda1 3)))))
(fma.f64 (.f64 (neg.f64 lambda2) lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda1) (fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (.f64 (cos.f64 phi2) (+.f64 (/.f64 (fma.f64 (pow.f64 lambda2 #s(literal 5 binary64)) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (neg.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal -1/6 binary64) (pow.f64 lambda2 #s(literal 4 binary64)))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (*.f64 lambda1 lambda1))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (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)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (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)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (+ lambda1 lambda2)))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(/ (pow lambda2 2) lambda1)
(/.f64 (*.f64 lambda2 lambda2) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (pow lambda2 2)) lambda1)
(/.f64 (fma.f64 lambda2 lambda2 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (neg.f64 lambda1))) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))) lambda1)
(/.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 6 binary64)) lambda1) (/.f64 #s(literal -1/6 binary64) lambda1) (fma.f64 lambda2 lambda2 (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 lambda1 lambda1)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) lambda1)) lambda1)
(/ (+ (* -1 (/ (pow lambda2 3) lambda1)) (+ (* -1 (/ (pow lambda2 5) (pow lambda1 3))) (+ (* -1/6 (/ (pow lambda2 6) (pow lambda1 2))) (+ (* 1/2 (/ (pow lambda2 7) (pow lambda1 3))) (+ (/ (pow lambda2 4) (pow lambda1 2)) (pow lambda2 2)))))) lambda1)
(/.f64 (-.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 6 binary64)) lambda1) (/.f64 #s(literal -1/6 binary64) lambda1) (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 7 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal 1/2 binary64) (fma.f64 lambda2 lambda2 (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 lambda1 lambda1))))) (/.f64 (pow.f64 lambda2 #s(literal 5 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) lambda1)) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (sin (/ (pow lambda2 2) (- lambda2 (* -1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))
(.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))
(+ (* -1 (/ (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (.f64 (.f64 (.f64 lambda2 lambda2) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (neg.f64 lambda1)))
(+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda2) lambda2 (.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) lambda1))) (neg.f64 lambda1)))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda2 5) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))))) lambda1)) (* (cos phi2) (- (* -1/2 (* (pow lambda2 4) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1)))))) (* -1 (* (pow lambda2 3) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))))) lambda1)) (* (pow lambda2 2) (* (cos phi2) (cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))) lambda1)) (* (cos phi2) (sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))))
(fma.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (fma.f64 (.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda2) lambda2 (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (neg.f64 (fma.f64 (pow.f64 lambda2 #s(literal 5 binary64)) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda2 #s(literal 4 binary64)))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))) lambda1) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))) (neg.f64 lambda1))) (neg.f64 lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 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)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (neg.f64 lambda1)) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1)))) lambda1)) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (neg.f64 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda1 2) (- lambda2 (* -1 lambda1))))
(sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(/ (pow lambda2 2) lambda1)
(/.f64 (*.f64 lambda2 lambda2) lambda1)
(* -1 (/ (+ (* -1 (pow lambda2 2)) (/ (pow lambda2 3) lambda1)) lambda1))
(/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) lambda1)) (neg.f64 lambda1))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1))
(/.f64 (neg.f64 (fma.f64 lambda2 lambda2 (/.f64 (-.f64 (neg.f64 (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda2 #s(literal 4 binary64)))) lambda1)) lambda1))) (neg.f64 lambda1))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda2 5)) (* 1/2 (pow lambda2 7))) lambda1)) (+ (* -1 (pow lambda2 4)) (* 1/6 (pow lambda2 6)))) lambda1)) (* -1 (pow lambda2 3))) lambda1)) (* -1 (pow lambda2 2))) lambda1))
(/.f64 (neg.f64 (fma.f64 lambda2 lambda2 (/.f64 (-.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 lambda2 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda2 #s(literal 4 binary64)))) (/.f64 (fma.f64 (pow.f64 lambda2 #s(literal 7 binary64)) #s(literal 1/2 binary64) (neg.f64 (pow.f64 lambda2 #s(literal 5 binary64)))) lambda1)) (neg.f64 lambda1)) (pow.f64 lambda2 #s(literal 3 binary64))) lambda1))) (neg.f64 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (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)))
(+ (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))))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (* -1 (/ (cos lambda1) (pow lambda1 2)))))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (fma.f64 (.f64 lambda2 (cos.f64 phi2)) (fma.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda1))) (cos.f64 lambda1) (/.f64 (cos.f64 lambda1) (.f64 lambda1 lambda1))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(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)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(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))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(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)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (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)))
(+ (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))))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(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)))
(/ (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (- (* (cos 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)))
(- (+ (* lambda2 (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda1) (cos phi2)) (cos phi1))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.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))) (sin.f64 lambda1)) (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))))
(- (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda1) (cos phi2)) (cos phi1))))
(fma.f64 (fma.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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 phi2)) (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)) (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.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))) (sin.f64 lambda1)) (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 (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.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))) (sin.f64 lambda1)) (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))))
(- (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (+ (* -1/6 (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (* (cos lambda1) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda1) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda1) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda1) 2) (pow (cos phi2) 2)) (- (* (cos lambda1) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos 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 lambda1) (cos.f64 lambda1)) #s(literal -4/3 binary64)) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.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))) (sin.f64 lambda1)) (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))))) (fma.f64 (.f64 #s(literal -1/6 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))) (sin.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)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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 phi2)) (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)) (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.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))) (sin.f64 lambda1)) (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 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))) lambda2 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 #s(literal 1/2 binary64) (/.f64 (.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 phi2)) (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)) (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.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))) (sin.f64 lambda1)) (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 (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (.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))) (sin.f64 lambda1)) (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))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1/2 (cos lambda1)) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (/.f64 (sin.f64 lambda1) lambda1)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1/2 (cos lambda1)) (* lambda2 (- (/ (cos lambda1) lambda1) (* (sin lambda1) (- 1/6 (/ 1 (pow lambda1 2))))))) (/ (sin lambda1) lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (cos.f64 lambda1) lambda1) (.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda1))) (sin.f64 lambda1))) lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 (sin.f64 lambda1) lambda1)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin 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))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (/ (cos lambda1) lambda1))))))
(fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda1) lambda1)) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (+ (* lambda2 (+ (* (cos lambda1) (- 1/6 (/ 1 (pow lambda1 2)))) (/ (sin lambda1) lambda1))) (/ (cos lambda1) lambda1)))))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) (cos.f64 lambda1) (/.f64 (sin.f64 lambda1) lambda1)) lambda2 (fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (/.f64 (cos.f64 lambda1) lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(/ (pow lambda2 2) lambda1)
(/.f64 (*.f64 lambda2 lambda2) lambda1)
(* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 2))) (/ 1 lambda1)))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) lambda1) (/.f64 lambda2 (.f64 lambda1 lambda1))) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* lambda2 (- (/ lambda2 (pow lambda1 3)) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)))
(.f64 (fma.f64 (-.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (.f64 lambda1 lambda1))) lambda2 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* lambda2 (- (* lambda2 (+ (* -1 (/ lambda2 (pow lambda1 4))) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)))
(.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 lambda2 (pow.f64 lambda1 #s(literal 4 binary64)))) lambda2 (/.f64 #s(literal -1 binary64) (.f64 lambda1 lambda1))) lambda2 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 lambda2 lambda2))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (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)))
(+ (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))))
(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)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (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)))
(+ (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))))
(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)))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ 1 (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 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)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (cos.f64 phi2))) (neg.f64 (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)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin 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))
(- (* (pow (cos lambda1) 2) (pow (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)))
(- (+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(fma.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) lambda2)) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(fma.f64 (fma.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))) 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))))
(- (+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi2) 2) (sin lambda1)))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (cos lambda1) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))
(fma.f64 (fma.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (sin.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (sin.f64 lambda1) (cos.f64 lambda1))) #s(literal -4/3 binary64) (.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (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))))
(- (* (cos lambda1) (cos phi2)) (cos phi1))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(- (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos 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)))
(- (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))) (cos phi1))
(fma.f64 (fma.f64 (.f64 lambda2 (.f64 #s(literal -1/2 binary64) (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)))
(- (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))) (cos phi1))
(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)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))
(fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (/.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2)))
(fma.f64 (/.f64 (cos.f64 phi2) lambda2) (/.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) lambda2) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (/.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))) (+ (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (pow lambda2 2)) (+ (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (+ (* -1/6 (pow lambda1 6)) (pow lambda1 4))) (* (pow lambda1 5) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (pow lambda2 3)) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (+ lambda1 lambda2))))) lambda2))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (cos.f64 phi2) (fma.f64 (cos.f64 phi2) (+.f64 (/.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) (.f64 lambda2 lambda2)) (/.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (.f64 (neg.f64 (pow.f64 lambda1 #s(literal 5 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) lambda2)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (+ (* -1/2 (/ (pow lambda1 6) (pow lambda2 4))) (+ (* 1/24 (/ (pow lambda1 8) (pow lambda2 4))) (/ (pow lambda1 5) (pow lambda2 3)))))))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 lambda2 lambda2)) (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 4 binary64)))) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 8 binary64)) (pow.f64 lambda2 #s(literal 4 binary64))) #s(literal 1/24 binary64) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(/ (pow lambda1 2) lambda2)
(/.f64 (*.f64 lambda1 lambda1) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (pow lambda1 2)) lambda2)
(/.f64 (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (neg.f64 lambda2))) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))) lambda2)
(/.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) lambda2) (/.f64 #s(literal -1/6 binary64) lambda2) (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 lambda2 lambda2)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2)) lambda2)
(/ (+ (* -1 (/ (pow lambda1 3) lambda2)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 3))) (+ (* -1/6 (/ (pow lambda1 6) (pow lambda2 2))) (+ (* 1/2 (/ (pow lambda1 7) (pow lambda2 3))) (+ (/ (pow lambda1 4) (pow lambda2 2)) (pow lambda1 2)))))) lambda2)
(/.f64 (-.f64 (-.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) lambda2) (/.f64 #s(literal -1/6 binary64) lambda2) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 7 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1/2 binary64) (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 lambda2 lambda2))))) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2)) lambda2)
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda1 2) (- lambda1 (* -1 lambda2))))) (* (cos (/ (pow lambda1 2) (- lambda1 (* -1 lambda2)))) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))
(.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (/ (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) lambda2))
(fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (/.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) lambda2))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2))) lambda2)))
(neg.f64 (fma.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) lambda2) (.f64 (.f64 (.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) lambda2)))
(+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1 (/ (+ (* -1 (* (pow lambda1 2) (* (cos phi2) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))) (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) (* -1 (* (pow lambda1 5) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))))) lambda2)) (* (cos phi2) (- (* -1 (* (pow lambda1 3) (cos (/ (pow lambda2 2) (- lambda1 (* -1 lambda2)))))) (* -1/2 (* (pow lambda1 4) (sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))))))) lambda2))) lambda2)))
(neg.f64 (fma.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) lambda1) lambda1 (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (fma.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 5 binary64)))) lambda2) (.f64 (neg.f64 (fma.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))) (cos.f64 phi2))) lambda2))) lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 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)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))))
(fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (/ (pow lambda1 4) (pow lambda2 2))) (/ (pow lambda1 5) (pow lambda2 3))))
(+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 6)) (+ (* -1/2 (pow lambda1 6)) (* 1/24 (pow lambda1 8)))) lambda2)) (* -1 (pow lambda1 5))) (pow lambda2 3))) (* -1/2 (/ (pow lambda1 4) (pow lambda2 2)))))
(fma.f64 (/.f64 (-.f64 (neg.f64 (pow.f64 lambda1 #s(literal 5 binary64))) (/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal -3/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 8 binary64)) #s(literal 1/24 binary64))) lambda2)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal -1/2 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal 1 binary64)))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(/ (pow lambda1 2) lambda2)
(/.f64 (*.f64 lambda1 lambda1) lambda2)
(* -1 (/ (+ (* -1 (pow lambda1 2)) (/ (pow lambda1 3) lambda2)) lambda2))
(/.f64 (fma.f64 (neg.f64 lambda1) lambda1 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2)) (neg.f64 lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (/.f64 (-.f64 (neg.f64 (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) lambda2)) lambda2))) (neg.f64 lambda2))
(* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (* 1/2 (pow lambda1 7))) lambda2)) (+ (* -1 (pow lambda1 4)) (* 1/6 (pow lambda1 6)))) lambda2)) (* -1 (pow lambda1 3))) lambda2)) (* -1 (pow lambda1 2))) lambda2))
(/.f64 (neg.f64 (fma.f64 lambda1 lambda1 (/.f64 (-.f64 (/.f64 (-.f64 (fma.f64 (pow.f64 lambda1 #s(literal 6 binary64)) #s(literal 1/6 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) (/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 7 binary64)) #s(literal 1/2 binary64) (neg.f64 (pow.f64 lambda1 #s(literal 5 binary64)))) lambda2)) (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 3 binary64))) lambda2))) (neg.f64 lambda2))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(sin (/ (pow lambda2 2) (- lambda1 (* -1 lambda2))))
(sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (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))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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)))))))))
(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)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(fma.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(- (+ (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))) (* 1/24 (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))))))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))
(fma.f64 (fma.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) #s(literal -1/2 binary64))) (.f64 phi2 phi2) (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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))))))))
(fma.f64 (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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))))))))
(fma.f64 (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi2 2)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) (.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (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))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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)))))))))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(.f64 (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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))))))))
(fma.f64 (fma.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64))) (.f64 phi2 phi2) (.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/ (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2)) (- (cos (- lambda1 lambda2)) (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)))
(- (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda1 lambda2)) (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 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/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))))
(- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda1 lambda2)) (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 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (.f64 (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal 1/24 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 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/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))))
(- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* (pow phi2 2) (- (+ (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* (pow phi2 2) (- (* -2/45 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* 1/3 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2)))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (+ (* -1/720 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1))))))))) (+ (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (* -1 (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (- (cos (- lambda1 lambda2)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda1 lambda2)) (- (pow (cos (- lambda1 lambda2)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda1 lambda2)) (cos phi1)) 2))))) (/ (pow (cos (- lambda1 lambda2)) 2) (- (cos (- lambda1 lambda2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda1 lambda2)) (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 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (.f64 (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal 1/24 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 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/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 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (.f64 (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal 1/24 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 (.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/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))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (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))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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)))))))))
(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)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (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))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (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)))
(+ (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)))))))))
(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)))
(+ 1 (cos (- lambda2 lambda1)))
(+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(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))
(+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(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 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+ 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)))))))))
(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 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- (pow (cos (- lambda1 lambda2)) 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)))
(- (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (fma.f64 #s(literal -1 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* 1/3 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))))) (pow (cos (- lambda1 lambda2)) 2)) (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))))
(- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda1 lambda2)) 2)) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (pow (cos (- lambda1 lambda2)) 2)))))) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (fma.f64 (.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))) (.f64 phi2 phi2) (neg.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 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))))
(- (cos (- lambda1 lambda2)) (cos phi1))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(- (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))) (cos phi1))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (cos.f64 phi1)))
(- (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))) (cos phi1))
(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)))
(- (+ (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)))))))) (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)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (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)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (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)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)))
(- (+ (* (pow phi1 2) (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)))
(fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.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 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))
(- (+ (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)))
(fma.f64 (fma.f64 (neg.f64 (.f64 phi1 phi1)) (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/3 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))) (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.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 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))
(- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 2/45 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (+ (* -1/2 (/ (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (+ (* -1/24 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/720 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))))) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2)))) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda1 lambda2))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda1 lambda2))) 1)))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (fma.f64 (/.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/3 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal -1/24 binary64) (.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))))))) (.f64 phi1 phi1) (neg.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/3 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))))) (.f64 phi1 phi1) (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))) (.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.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 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (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)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (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)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (.f64 (fma.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) 1)
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64))
(- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow phi1 2)) 1)
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (fma.f64 phi1 phi1 #s(literal -1 binary64)))
(- (+ (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 1)
(fma.f64 (.f64 (fma.f64 (.f64 phi1 phi1) #s(literal -1/3 binary64) #s(literal 1 binary64)) phi1) phi1 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)))
(- (+ (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) 1)
(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 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1 binary64)))
(- (* (cos phi2) (cos (- lambda1 lambda2))) 1)
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal -1 binary64))
(- (+ (* 1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))) 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)))
(- (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2))))) 1)
(fma.f64 (.f64 (fma.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)))
(- (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24))))) 1)
(fma.f64 (.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (.f64 phi1 phi1) #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)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 2) (+ lambda1 lambda2))) (sin (/ (pow lambda1 2) (+ lambda1 lambda2)))) (* (cos (/ (pow lambda1 2) (+ lambda1 lambda2))) (sin (/ (pow lambda2 2) (+ lambda1 lambda2)))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 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)
(+ 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)
(+ 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)
(+ 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)
(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)))
(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)))
(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)))
(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)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1)))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))))
(atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)) (pow (cos phi1) 2))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(- (* (cos phi2) (cos (- lambda1 lambda2))) (cos phi1))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))

rewrite261.0ms (1.6%)

Memory

-0.7MiB live, 193.2MiB allocated

Rules

4 890×	`lower-*.f32`
4 868×	`lower-*.f64`
4 404×	`lower-fma.f32`
4 398×	`lower-fma.f64`
2 834×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	74	641
0	131	623
1	435	587
2	3121	587
0	8235	572

Stop Event

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

Counts

31 → 413

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

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

eval964.0ms (5.9%)

Memory: 28.7MiB live, 371.1MiB allocated
Compiler: Compiled 74 135 to 4 023 computations (94.6% saved)

prune154.0ms (0.9%)

Memory

-25.2MiB live, 295.9MiB allocated

Pruning

62 alts after pruning (62 fresh and 0 done)

	Pruned	Kept	Total
New	1 931	30	1 961
Fresh	23	32	55
Picked	5	0	5
Done	0	0	0
Total	1 959	62	2 021

Accuracy

99.7%

Counts

2 021 → 62

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	50.8%	(/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
	98.8%	(/.f64 #s(literal 1 binary64) (/.f64 #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)))
	93.9%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	75.5%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	74.6%	(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (cos.f64 phi2)) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	80.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	76.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	76.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	84.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
	92.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.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)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (neg.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))))))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (/.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (neg.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
	63.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sqrt.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))) (sqrt.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))) (cos.f64 phi1))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1) (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (.f64 (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 4 binary64)))))))
	92.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 (-.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))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	74.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 #s(approx (- (cos phi1) ( (cos (- lambda2 lambda1)) (cos phi2))) (-.f64 #s(literal 1 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	85.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (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)))))))))
	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	85.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal -1 binary64)))))
	72.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (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))))))
	80.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 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
	74.2%	(+.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 (/.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)))))))
	74.2%	(+.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 (.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
	70.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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
	79.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	75.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 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	98.4%	(+.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) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
	98.4%	(+.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) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
	98.4%	(+.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 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	59.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	87.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) (.f64 phi2 phi2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	66.2%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (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))))))
	77.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	31.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
▶	64.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))))
	77.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)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	73.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	49.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sqrt.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64)))))
	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 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))))))
	72.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (.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))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal -1 binary64)))))
	77.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	68.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	78.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	64.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	78.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
	78.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
	64.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
▶	63.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	78.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
▶	54.9%	(+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	73.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	72.3%	(+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	46.3%	(.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)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (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 6 binary64)))) (fma.f64 (.f64 (-.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (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 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda1 lambda1)) (pow.f64 lambda1 #s(literal 4 binary64))))
	53.1%	(.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 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #s(literal 2 binary64))) (pow.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 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #s(literal -1 binary64)))
▶	99.0%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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))
	44.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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))))

Compiler

Compiled 3 974 to 2 414 computations (39.3% saved)

simplify105.0ms (0.6%)

Memory

18.7MiB live, 136.1MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

4 458×	`lower-fma.f32`
4 446×	`lower-fma.f64`
3 360×	`lower-*.f32`
3 350×	`lower-*.f64`
1 578×	`lower-/.f32`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	70	916
0	118	899
1	186	897
2	285	873
3	465	834
4	898	832
5	2298	832
6	4159	832
0	8001	832

Stop Event

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

Calls

Call 1

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

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

localize413.0ms (2.5%)

Memory

-15.4MiB live, 671.7MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))
accuracy	19.16345922218834	(/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
accuracy	24.70054401233944	#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
accuracy	26.351136446363604	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy	0.4422464242172288	(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	30.293964499695228	#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))))
accuracy	31.650926641021645	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	24.70054401233944	#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy	26.351136446363604	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))))
accuracy	31.65378778239625	#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	24.70054401233944	#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy	26.351136446363604	#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
accuracy	38.11037203905157	#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
accuracy	0.2265625	(/.f64 (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.48502813000213485	(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
accuracy	12.606013504955879	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	12.613854520941823	(sin.f64 (-.f64 lambda1 lambda2))

Samples

319.0ms	184×	1	valid
31.0ms	72×	0	valid

Compiler

Compiled 608 to 58 computations (90.5% saved)

Precisions

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

ival-cos: 92.0ms (30.4% of total)

ival-mult: 58.0ms (19.1% of total)

ival-sin: 45.0ms (14.8% of total)

adjust: 26.0ms (8.6% of total)

ival-atan2: 26.0ms (8.6% of total)

ival-add: 23.0ms (7.6% of total)

ival-sub: 17.0ms (5.6% of total)

ival-div: 8.0ms (2.6% of total)

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

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

exact: 1.0ms (0.3% of total)

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

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

series130.0ms (0.8%)

Memory

14.4MiB live, 254.1MiB allocated

Counts

29 → 1 200

Calls

Call 1

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

Outputs
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (cos phi2))) (* lambda1 (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (cos phi2))) (* lambda1 (+ (cos phi2) (* 1/2 (* lambda1 (* lambda2 (cos phi2))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (cos phi2))) (* lambda1 (+ (cos phi2) (* lambda1 (+ (* -1/6 (* lambda1 (cos phi2))) (* 1/2 (* lambda2 (cos phi2)))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (taylor 0 lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (taylor 0 lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda1 2)) (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2)) (taylor 0 lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda1 2)) (taylor inf lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) 1)) (taylor inf lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) 1)) (taylor inf lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) 1)) (taylor inf lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) (taylor -inf lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) (taylor -inf lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) (taylor -inf lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1) (taylor -inf lambda1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda1 2)) (taylor -inf lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (pow lambda1 2)) 1)) (taylor -inf lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (pow lambda1 2)) 1)) (taylor -inf lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (pow lambda1 2)) 1)) (taylor -inf lambda1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (taylor -inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (taylor -inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (taylor -inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) 2) (taylor -inf lambda1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (/ (* (cos phi2) (sin lambda1)) lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (/ (* (cos phi2) (sin lambda1)) lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (/ (* (cos phi2) (sin lambda1)) lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1) (taylor -inf lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1) (taylor -inf lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1) (taylor -inf lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1) (taylor -inf lambda2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) lambda2)) (* (cos lambda1) (cos phi2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) lambda2)) (* (cos lambda1) (cos phi2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ (* -1 (/ (* (cos phi2) (sin lambda1)) lambda2)) (* (cos lambda1) (cos phi2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)) (taylor -inf lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)) (taylor -inf lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)) (taylor -inf lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) lambda1)) (taylor -inf lambda2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (pow lambda1 2)) (taylor -inf lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (pow lambda1 2)) (taylor -inf lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (pow lambda1 2)) (taylor -inf lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (pow lambda1 2)) (taylor -inf lambda2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (taylor -inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (taylor -inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (taylor -inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) 2) (taylor -inf lambda2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (+ (* -1 (* lambda2 (cos lambda1))) (* (pow phi2 2) (+ (* -1/2 (sin lambda1)) (* 1/2 (* lambda2 (cos lambda1))))))) (taylor 0 phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (+ (* -1 (* lambda2 (cos lambda1))) (* (pow phi2 2) (+ (* -1/2 (sin lambda1)) (+ (* 1/2 (* lambda2 (cos lambda1))) (* (pow phi2 2) (+ (* -1/24 (* lambda2 (cos lambda1))) (* 1/24 (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (+ (* -1 (* lambda2 (cos lambda1))) (* (pow phi2 2) (+ (* -1/2 (sin lambda1)) (+ (* 1/2 (* lambda2 (cos lambda1))) (* (pow phi2 2) (+ (* -1/24 (* lambda2 (cos lambda1))) (+ (* 1/24 (sin lambda1)) (* (pow phi2 2) (+ (* -1/720 (sin lambda1)) (* 1/720 (* lambda2 (cos lambda1))))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 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))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor -inf phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor -inf phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor -inf phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor -inf phi2) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) (patch (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor -inf phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor -inf phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor -inf phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor -inf phi2) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor -inf phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor -inf phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor -inf phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor -inf phi2) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor -inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor -inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor -inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor -inf phi2) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor 0 phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor 0 phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor 0 phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor 0 phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor inf phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor inf phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor inf phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (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) (patch (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) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt #s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) (patch #s(approx (+ lambda1 (atan2 ( (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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)) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor -inf phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor -inf phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor -inf phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1) (taylor -inf phi1) (#s(alt (/.f64 (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) (patch (/.f64 (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) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (patch (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) (patch (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (cos.f64 phi2)))) #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))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor -inf phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor -inf phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor -inf phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (taylor -inf phi1) (#s(alt (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) (patch (/.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor -inf phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor -inf phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor -inf phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (pow lambda1 2)) (taylor -inf phi1) (#s(alt (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (patch (-.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor -inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor -inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor -inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (taylor -inf phi1) (#s(alt (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (patch (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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (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 lambda2 lambda1)) (cos.f64 phi1)))) (patch (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 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())

Calls

12 calls:

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

simplify242.0ms (1.5%)

Memory

-14.9MiB live, 374.3MiB allocated

Algorithm

1×	egg-herbie

Rules

14 640×	`lower-fma.f64`
14 640×	`lower-fma.f32`
5 752×	`lower-*.f64`
5 752×	`lower-*.f32`
4 210×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	407	20085
1	1272	19810
2	3570	19539
3	7500	19539
0	8198	18380

Stop Event

1×	iter limit
1×	node limit

Counts

1 200 → 1 188

Calls

Call 1

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

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

rewrite243.0ms (1.5%)

Memory

19.7MiB live, 421.1MiB allocated

Rules

6 012×	`lower-*.f32`
6 002×	`lower-*.f64`
5 040×	`lower-fma.f32`
5 028×	`lower-fma.f64`
3 674×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	70	718
0	118	701
1	469	664
2	3592	654
0	9996	652

Stop Event

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

Counts

29 → 326

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

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

eval320.0ms (2%)

Memory: 9.1MiB live, 512.9MiB allocated
Compiler: Compiled 65 949 to 2 947 computations (95.5% saved)

prune577.0ms (3.6%)

Memory

-1 242.9MiB live, 322.8MiB allocated

Pruning

70 alts after pruning (70 fresh and 0 done)

	Pruned	Kept	Total
New	1 960	20	1 980
Fresh	7	50	57
Picked	5	0	5
Done	0	0	0
Total	1 972	70	2 042

Accuracy

99.7%

Counts

2 042 → 70

Alt Table

Click to see full alt table

Status	Accuracy	Program
	28.7%	(/.f64 (-.f64 (pow.f64 (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)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)) (-.f64 (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)))) (+.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) lambda1))
	24.5%	(/.f64 #s(approx (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (* lambda1 lambda1)) (.f64 (neg.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
	98.8%	(/.f64 #s(literal 1 binary64) (/.f64 #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)))
	93.9%	(+.f64 lambda1 (atan2.f64 (/.f64 (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	75.5%	(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	74.6%	(+.f64 lambda1 (atan2.f64 (.f64 (exp.f64 (.f64 (log.f64 (cos.f64 phi2)) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	80.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	76.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	92.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	76.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	84.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
	92.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.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)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (neg.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))))))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (/.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (neg.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))))
	63.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sqrt.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))) (sqrt.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2))) (cos.f64 phi1))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1) (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
	85.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (.f64 (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (+.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 4 binary64)))))))
	92.5%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (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 (-.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))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))))
	85.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (.f64 (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))
	98.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (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)))))))))
	79.9%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	85.0%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 (-.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal -1 binary64)))))
	72.7%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (/ (- (pow ( (cos (- lambda1 lambda2)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (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.2%	(+.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 (/.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)))))))
	74.2%	(+.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 (.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
	70.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 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
	79.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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
	75.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 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	98.4%	(+.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) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
	98.4%	(+.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) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
	98.4%	(+.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 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
	79.6%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	59.1%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	87.8%	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	77.5%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2) #s(literal 1/24 binary64)) (.f64 phi2 phi2) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	66.2%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (.f64 phi2 phi2) #s(literal 1 binary64))) (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))))))
	77.9%	(+.f64 lambda1 (atan2.f64 (.f64 #s(approx (cos phi2) (fma.f64 (.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
	31.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (cos (* lambda2 (/ lambda2 (+ lambda2 lambda1))))) (* (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) (sin (* lambda2 (/ lambda2 (+ lambda2 lambda1))))))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
	77.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)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	73.7%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	49.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (sqrt.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (sqrt.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (cos.f64 phi1))))
	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) #s(literal -1 binary64)))))
	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
	78.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 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))))))
	72.5%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (.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))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal -1 binary64)))))
	68.0%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	78.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
	64.9%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	78.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
	78.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
	64.6%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
	64.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (* lambda2 (cos phi2))) (cos lambda1)) (* (sin lambda1) (cos phi2))) (fma.f64 (.f64 lambda2 (cos.f64 phi2)) (fma.f64 lambda1 (.f64 #s(literal 1/2 binary64) lambda1) #s(literal -1 binary64)) (.f64 lambda1 (cos.f64 phi2))))) #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))))))
	58.2%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (* lambda2 (cos phi2))) (cos lambda1)) (* (sin lambda1) (cos phi2))) (.f64 (neg.f64 lambda2) (cos.f64 phi2)))) #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))))))
	64.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (* lambda2 (cos phi2))) (cos lambda1)) (* (sin lambda1) (cos phi2))) (.f64 (cos.f64 phi2) (-.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))))))
	63.4%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
	78.3%	(+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	56.1%	(+.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 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	53.3%	(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (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))))))
	52.1%	(+.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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
	56.2%	(+.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 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
	54.6%	(+.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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
	54.6%	(+.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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
	72.3%	(+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
	53.1%	(.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 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #s(literal 2 binary64))) (pow.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 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #s(literal -1 binary64)))
	44.8%	#s(approx (/ (- (pow (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) 2) (* lambda1 lambda1)) (- (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
	98.1%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (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))
	79.8%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1) lambda1 lambda1))
	80.0%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ ( (cos (- lambda1 lambda2)) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1) lambda1 lambda1))
	98.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 #s(literal 1 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))))) lambda1 lambda1))
	98.9%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (.f64 (pow.f64 lambda1 #s(literal -1 binary64)) (pow.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 -1 binary64)) #s(literal -1 binary64))) lambda1 lambda1))
	50.4%	#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (exp.f64 (.f64 (log.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))))) #s(literal -1 binary64))) lambda1 lambda1))

Compiler

Compiled 6 297 to 2 002 computations (68.2% saved)

regimes258.0ms (1.6%)

Memory

-5.7MiB live, 396.7MiB allocated

Counts

130 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

39.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
38.0ms	lambda2
37.0ms	lambda1
37.0ms	(cos.f64 phi2)
34.0ms	phi2

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes176.0ms (1.1%)

Memory

11.5MiB live, 217.4MiB allocated

Counts

83 → 1

Calls

Call 1

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

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:

38.0ms	phi1
24.0ms	lambda2
24.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))))))
22.0ms	(cos.f64 phi1)
22.0ms	lambda1

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes122.0ms (0.8%)

Memory

-24.3MiB live, 135.3MiB allocated

Counts

54 → 1

Calls

Call 1

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

Calls

7 calls:

30.0ms	phi2
17.0ms	lambda1
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))))))
14.0ms	lambda2

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes110.0ms (0.7%)

Memory

34.8MiB live, 147.1MiB allocated

Counts

51 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
91.4%	3	`lambda1`
99.0%	3	`lambda2`
93.3%	2	`phi1`
97.1%	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))))))`
94.1%	2	`(cos.f64 phi2)`
93.1%	2	`(cos.f64 phi1)`
94.1%	2	`phi2`

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes82.0ms (0.5%)

Memory

-9.4MiB live, 76.1MiB allocated

Counts

50 → 5

Calls

Call 1

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

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

4 calls:

32.0ms	phi2
14.0ms	(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
14.0ms	lambda2
13.0ms	(cos.f64 phi2)

Results

Accuracy	Segments	Branch
92.4%	2	`(cos.f64 phi2)`
92.2%	2	`phi2`
98.6%	5	`(+.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))))))`
91.1%	3	`lambda2`

Compiler

Compiled 24 to 27 computations (-12.5% saved)

regimes64.0ms (0.4%)

Memory

-21.3MiB live, 95.6MiB allocated

Counts

49 → 2

Calls

Call 1

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

Outputs

(+.f64 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 #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

4 calls:

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

Results

Accuracy	Segments	Branch
92.4%	2	`(cos.f64 phi2)`
91.8%	2	`(cos.f64 phi1)`
91.7%	2	`phi1`
93.1%	5	`(+.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 25 to 28 computations (-12% saved)

regimes12.0ms (0.1%)

Memory

22.6MiB live, 22.6MiB allocated

Counts

39 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

10.0ms

(cos.f64 phi2)

Results

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

Compiler

Compiled 2 to 5 computations (-150% saved)

regimes42.0ms (0.3%)

Memory

1.5MiB live, 77.9MiB allocated

Counts

35 → 2

Calls

Call 1

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
90.2%	2	`phi1`
90.1%	2	`(cos.f64 phi1)`
90.1%	2	`phi2`
90.2%	2	`(cos.f64 phi2)`

Compiler

Compiled 6 to 18 computations (-200% saved)

regimes77.0ms (0.5%)

Memory

-23.7MiB live, 131.1MiB allocated

Counts

34 → 2

Calls

Call 1

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

Outputs

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

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes10.0ms (0.1%)

Memory

20.5MiB live, 20.5MiB allocated

Counts

32 → 2

Calls

Call 1

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

Outputs

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

Calls

1 calls:

8.0ms

(cos.f64 phi2)

Results

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

Compiler

Compiled 2 to 5 computations (-150% saved)

regimes13.0ms (0.1%)

Memory

-15.6MiB live, 22.5MiB allocated

Counts

16 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

7.0ms	phi2
5.0ms	(cos.f64 phi2)

Results

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

Compiler

Compiled 3 to 9 computations (-200% saved)

regimes41.0ms (0.3%)

Memory

21.9MiB live, 63.9MiB allocated

Counts

13 → 1

Calls

Call 1

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

Calls

7 calls:

14.0ms	lambda2
5.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))))))
5.0ms	phi2
4.0ms	phi1
4.0ms	lambda1

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes23.0ms (0.1%)

Memory

8.7MiB live, 46.8MiB allocated

Counts

7 → 1

Calls

Call 1

Inputs
(+.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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.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)))) (+.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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes17.0ms (0.1%)

Memory

4.1MiB live, 42.7MiB allocated

Counts

4 → 1

Calls

Call 1

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes18.0ms (0.1%)

Memory

6.7MiB live, 41.9MiB allocated

Counts

3 → 1

Calls

Call 1

Inputs

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

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

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes18.0ms (0.1%)

Memory

-5.3MiB live, 35.3MiB allocated

Counts

2 → 1

Calls

Call 1

Inputs

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

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes10.0ms (0.1%)

Memory

4.5MiB live, 44.1MiB allocated

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 28 to 40 computations (-42.9% saved)

bsearch62.0ms (0.4%)

Memory

-35.4MiB live, 86.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
24.0ms	1.2227626572912945e-57	3.4446059915369934e-57
34.0ms	-11.204203020421032	-0.010760856264199984

Samples

28.0ms	45×	1	valid
21.0ms	163×	0	valid

Compiler

Compiled 504 to 437 computations (13.3% saved)

Precisions

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

ival-cos: 23.0ms (55% of total)

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

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

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

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

ival-add: 3.0ms (7.2% of total)

adjust: 2.0ms (4.8% of total)

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

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

bsearch1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Algorithm

4×	left-value

Steps

Time	Left	Right
0.0ms	3.034096909928857	3.1147890544736527
0.0ms	2.6366863519552936e-22	9.90011055979124e-18
0.0ms	-0.0835904031318606	-5.051559863539663e-10
0.0ms	-3.141592653589788	-3.041621193627806

Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9974724020624318	0.99812262797348

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9974724020624318	0.99812262797348

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9974724020624318	0.99812262797348

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9974724020624318	0.99812262797348

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9974724020624318	0.99812262797348

Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.7005129041033421	0.7459832828231449

Compiler

Compiled 22 to 21 computations (4.5% saved)

simplify31.0ms (0.2%)

Memory

12.3MiB live, 51.2MiB allocated

Algorithm

1×	egg-herbie

Rules

66×	`+-commutative-binary64-+.f64`
34×	`-commutative-binary64-.f64`
18×	`sub-neg-binary64-neg.f64-+.f64--.f64`
12×	`neg-sub0-binary64--.f64-neg.f64`
12×	`neg-mul-1-binary64-*.f64-neg.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	158	1107
1	208	1107
2	226	1107
3	237	1107
4	243	1107
5	244	1107

Stop Event

1×

saturated

Calls

Call 1

Inputs
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.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))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(if (<=.f64 lambda2 #s(literal -3170534137668829/288230376151711744 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (if (<=.f64 lambda2 #s(literal 6007280020246507/1766847064778384329583297500742918515827483896875618958121606201292619776 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) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))))
(if (<=.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -6980579422424269/2251799813685248 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))))) (if (<=.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -3602879701896397/72057594037927936 binary64)) #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)))) (if (<=.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 5316911983139663/10633823966279326983230456482242756608 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))))) (if (<=.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 6980579422424269/2251799813685248 binary64)) #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)))) (+.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 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (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 #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 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))) (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (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))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (* lambda2 (cos phi2))) (cos lambda1)) (* (sin lambda1) (cos phi2))) (.f64 (cos.f64 phi2) (-.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 #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 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (* lambda2 (cos phi2))) (cos lambda1)) (* (sin lambda1) (cos phi2))) (.f64 (cos.f64 phi2) (-.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 #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))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 3242591731706757/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))

Outputs
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (.f64 #s(approx (cos ( lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)) (sin.f64 (.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (-.f64 (.f64 (cos.f64 (.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) lambda1))) (.f64 (sin.f64 (.f64 (/.f64 lambda2 (+.f64 lambda2 lambda1)) lambda2)) #s(approx (cos (* lambda1 (/ lambda1 (+ lambda2 lambda1)))) #s(literal 1 binary64)))) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(if (<=.f64 lambda2 #s(literal -3170534137668829/288230376151711744 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))) (if (<=.f64 lambda2 #s(literal 6007280020246507/1766847064778384329583297500742918515827483896875618958121606201292619776 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) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))))
(if (<=.f64 lambda2 #s(literal -3170534137668829/288230376151711744 binary64)) (+.f64 (atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (+.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1) (if (<=.f64 lambda2 #s(literal 6007280020246507/1766847064778384329583297500742918515827483896875618958121606201292619776 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 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (+.f64 (atan2.f64 (.f64 #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (+.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)))
(if (<=.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -6980579422424269/2251799813685248 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))))) (if (<=.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -3602879701896397/72057594037927936 binary64)) #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)))) (if (<=.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 5316911983139663/10633823966279326983230456482242756608 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))))) (if (<=.f64 (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 6980579422424269/2251799813685248 binary64)) #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)))) (+.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 (+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1) #s(literal -6980579422424269/2251799813685248 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 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (if (<=.f64 (+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1) #s(literal -3602879701896397/72057594037927936 binary64)) #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)))) (if (<=.f64 (+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1) #s(literal 5316911983139663/10633823966279326983230456482242756608 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 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (if (<=.f64 (+.f64 (atan2.f64 (.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1) #s(literal 6980579422424269/2251799813685248 binary64)) #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)))) (+.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 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)))))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (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 #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 4494592428115755/4503599627370496 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 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) lambda1) (+.f64 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))) (+.f64 lambda1 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 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 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))) lambda1) (+.f64 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (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))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 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) #s(literal 1 binary64)))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (* lambda2 (cos phi2))) (cos lambda1)) (* (sin lambda1) (cos phi2))) (.f64 (cos.f64 phi2) (-.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 #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 4494592428115755/4503599627370496 binary64)) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (* lambda2 (cos phi2))) (cos lambda1)) (* (sin lambda1) (cos phi2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 phi2)))) #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))))) lambda1) (+.f64 (atan2.f64 #s(approx ( (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (* lambda2 (cos phi2))) (cos lambda1)) (* (sin lambda1) (cos phi2))) (.f64 (cos.f64 phi2) (-.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 #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))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (+ (* (neg (* lambda2 (cos phi2))) (cos lambda1)) (* (sin lambda1) (cos phi2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 phi2)))) #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))))) 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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 3242591731706757/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) ( (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ ( (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 3242591731706757/4503599627370496 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 #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)))))) 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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) 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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 (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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) 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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 (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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)))) 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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 (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)))) (+.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (cos.f64 phi1)))) lambda1)

soundness1.4s (8.9%)

Memory

-19.2MiB live, 1 156.7MiB allocated

Rules

14 730×	`lower-fma.f64`
14 730×	`lower-fma.f32`
14 640×	`lower-fma.f64`
14 640×	`lower-fma.f32`
12 110×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1013	23063
1	3093	22658
0	8680	21798
0	1149	27146
1	3470	26625
0	8999	25577
0	230	3176
1	683	3129
2	1899	3074
3	3745	3074
0	8498	2880
0	407	20085
1	1272	19810
2	3570	19539
3	7500	19539
0	8198	18380
0	14	63
0	24	63
1	82	63
2	574	63
3	6899	63
0	8442	60

Stop Event

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

Compiler

Compiled 1 378 to 690 computations (49.9% saved)

preprocess171.0ms (1.1%)

Memory

-6.5MiB live, 307.7MiB allocated

Remove

(abs phi1)

(abs phi2)

Compiler

Compiled 3 224 to 1 332 computations (58.7% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

Iter	Nodes	Cost
0	14	81
0	24	81
1	30	81
2	35	81
3	41	81
4	50	81
5	74	81
6	113	81
7	152	81
8	221	81
9	274	81
10	362	81
11	397	81
12	426	81
13	490	81
14	529	81
15	548	81
16	568	81
17	590	81
18	606	81
19	609	81
0	609	78

Iter	Nodes	Cost
0	14	81
0	24	81
1	30	81
2	35	81
3	41	81
4	50	81
5	74	81
6	113	81
7	152	81
8	221	81
9	274	81
10	362	81
11	397	81
12	426	81
13	490	81
14	529	81
15	548	81
16	568	81
17	590	81
18	606	81
19	609	81
0	609	78

start0.0ms (0%)

analyze817.0ms (5%)

sample4.1s (25%)

explain483.0ms (3%)

preprocess232.0ms (1.4%)

eval0.0ms (0%)

prune2.0ms (0%)

simplify34.0ms (0.2%)

localize261.0ms (1.6%)

series92.0ms (0.6%)

simplify391.0ms (2.4%)

rewrite331.0ms (2%)

eval85.0ms (0.5%)

prune54.0ms (0.3%)

simplify183.0ms (1.1%)

localize546.0ms (3.4%)

series150.0ms (0.9%)

simplify264.0ms (1.6%)

rewrite239.0ms (1.5%)

eval370.0ms (2.3%)

prune128.0ms (0.8%)

simplify127.0ms (0.8%)

localize496.0ms (3.1%)

series187.0ms (1.2%)

simplify497.0ms (3.1%)

rewrite261.0ms (1.6%)

eval964.0ms (5.9%)

prune154.0ms (0.9%)

simplify105.0ms (0.6%)

localize413.0ms (2.5%)

series130.0ms (0.8%)

simplify242.0ms (1.5%)

rewrite243.0ms (1.5%)

eval320.0ms (2%)

prune577.0ms (3.6%)

regimes258.0ms (1.6%)

regimes176.0ms (1.1%)

regimes122.0ms (0.8%)

regimes110.0ms (0.7%)

regimes82.0ms (0.5%)

regimes64.0ms (0.4%)

regimes12.0ms (0.1%)

regimes42.0ms (0.3%)

regimes77.0ms (0.5%)

regimes10.0ms (0.1%)

regimes13.0ms (0.1%)

regimes41.0ms (0.3%)

regimes23.0ms (0.1%)

regimes17.0ms (0.1%)

regimes18.0ms (0.1%)

regimes18.0ms (0.1%)

regimes10.0ms (0.1%)

bsearch62.0ms (0.4%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify31.0ms (0.2%)

soundness1.4s (8.9%)

preprocess171.0ms (1.1%)

end0.0ms (0%)

Profiling

Iter	Nodes	Cost
0	14	81
0	24	81
1	30	81
2	35	81
3	41	81
4	50	81
5	74	81
6	113	81
7	152	81
8	221	81
9	274	81
10	362	81
11	397	81
12	426	81
13	490	81
14	529	81
15	548	81
16	568	81
17	590	81
18	606	81
19	609	81
0	609	78