Midpoint on a great circle

Time bar (total: 15.9s)

start0.0ms (0%)

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

analyze835.0ms (5.3%)

Memory
3.0MiB live, 1 007.3MiB allocated; 201ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
9.4%9.4%90.4%0.2%0%0%0%9
9.4%9.4%90.4%0.2%0%0%0%10
10.9%10.9%88.9%0.2%0%0%0%11
10.9%10.9%88.9%0.2%0%0%0%12
Compiler

Compiled 22 to 16 computations (27.3% saved)

sample6.0s (38.1%)

Memory
-56.3MiB live, 6 566.1MiB allocated; 2.2s collecting garbage
Samples
4.6s4 538×1valid
634.0ms3 710×0valid
6.0ms2valid
Precisions
Click to see histograms. Total time spent on operations: 4.8s
ival-cos: 3.0s (63.1% of total)
ival-sin: 598.0ms (12.5% of total)
adjust: 434.0ms (9.1% of total)
ival-atan2: 297.0ms (6.2% of total)
ival-mult: 198.0ms (4.1% of total)
ival-add: 138.0ms (2.9% of total)
ival-sub: 93.0ms (1.9% of total)
ival-true: 6.0ms (0.1% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

explain513.0ms (3.2%)

Memory
22.5MiB live, 415.5MiB allocated; 45ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
58127(-4.27786070018609e-180 7.371149998924081e+141 -2.2292103012210446e+83 -5.31032423670262e+94)0-(sin.f64 (-.f64 lambda1 lambda2))
58128(-4.27786070018609e-180 7.371149998924081e+141 -2.2292103012210446e+83 -5.31032423670262e+94)0-(cos.f64 (-.f64 lambda1 lambda2))
40-3(3.225713896178902e-204 1.0436995115552231e+78 8.645529864561371e+159 1.5716265926297574e-241)(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
00-0-lambda2
00-0-phi1
00-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))))))
00-0-phi2
00-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)))))
00-0-(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
00-0-(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
00-0-(-.f64 lambda1 lambda2)
00-0-lambda1
00-0-(cos.f64 phi2)
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (-.f64 lambda1 lambda2))sensitivity1860
sin.f64(sin.f64 (-.f64 lambda1 lambda2))sensitivity1850
Confusion
Predicted +Predicted -
+62
-18068
Precision
0.03225806451612903
Recall
0.75
Confusion?
Predicted +Predicted MaybePredicted -
+602
-180167
Precision?
0.03208556149732621
Recall?
0.75
Freqs
test
numberfreq
070
11
2185
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
252.0ms372×1valid
19.0ms138×0valid
1.0ms2valid
Compiler

Compiled 186 to 46 computations (75.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 235.0ms
ival-cos: 131.0ms (55.8% of total)
adjust: 32.0ms (13.6% of total)
ival-sin: 32.0ms (13.6% of total)
ival-atan2: 15.0ms (6.4% of total)
ival-mult: 12.0ms (5.1% of total)
ival-add: 8.0ms (3.4% of total)
ival-sub: 5.0ms (2.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess246.0ms (1.6%)

Memory
-10.3MiB live, 171.5MiB allocated; 30ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
092294
1216293
2419293
3937293
42453293
56073293
01420
02420
14620
28320
318220
445020
5123320
6358020
7755520
0805519
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
Symmetry

(abs phi2)

(abs phi1)

Compiler

Compiled 20 to 14 computations (30% saved)

eval0.0ms (0%)

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

Compiled 0 to 4 computations (-∞% saved)

prune0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Compiler

Compiled 20 to 14 computations (30% saved)

simplify188.0ms (1.2%)

Memory
25.8MiB live, 172.7MiB allocated; 19ms collecting garbage
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(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-diff0
(+.f64 lambda1 (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-diff1
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01481
02481
14681
28381
318281
445081
5123381
6358081
7755581
0805578
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))

localize231.0ms (1.5%)

Memory
-6.0MiB live, 143.4MiB allocated; 24ms collecting garbage
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.19140625
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.5034179964119372
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy12.691121762716747
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.082158855204195
(sin.f64 (-.f64 lambda1 lambda2))
Samples
209.0ms186×1valid
9.0ms69×0valid
1.0ms2valid
Compiler

Compiled 83 to 16 computations (80.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 174.0ms
ival-sin: 73.0ms (41.9% of total)
ival-cos: 65.0ms (37.3% of total)
adjust: 13.0ms (7.5% of total)
ival-mult: 9.0ms (5.2% of total)
ival-atan2: 7.0ms (4% of total)
ival-add: 4.0ms (2.3% of total)
ival-sub: 2.0ms (1.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series21.0ms (0.1%)

Memory
-17.8MiB live, 28.0MiB allocated; 3ms collecting garbage
Counts
6 → 65
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
Calls

12 calls:

TimeVariablePointExpression
4.0ms
lambda1
@-inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (cos (- lambda1 lambda2)))
2.0ms
phi1
@inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (cos (- lambda1 lambda2)))
2.0ms
lambda1
@inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (cos (- lambda1 lambda2)))
2.0ms
lambda1
@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)))

simplify143.0ms (0.9%)

Memory
-13.9MiB live, 127.1MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02951639
18981598
232351539
080051432
Stop Event
iter limit
node limit
Counts
65 → 65
Calls
Call 1
Inputs
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
Outputs
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 (sin.f64 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 (sin.f64 lambda2) #s(literal 1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 lambda1 lambda1) lambda1))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal -1/720 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1)) #s(literal 1/2 binary64))) (*.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))

rewrite194.0ms (1.2%)

Memory
37.0MiB live, 166.3MiB allocated; 17ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01463
02463
19763
281563
0821560
Stop Event
iter limit
node limit
iter limit
Counts
6 → 127
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))) (/.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (-.f64 (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (*.f64 (neg.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (sin.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))

eval34.0ms (0.2%)

Memory
-17.2MiB live, 44.6MiB allocated; 7ms collecting garbage
Compiler

Compiled 8 694 to 1 035 computations (88.1% saved)

prune37.0ms (0.2%)

Memory
9.3MiB live, 56.0MiB allocated; 2ms collecting garbage
Pruning

31 alts after pruning (31 fresh and 0 done)

PrunedKeptTotal
New15031181
Fresh000
Picked101
Done000
Total15131182
Accuracy
99.2%
Counts
182 → 31
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.9%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
53.4%
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))))
53.4%
(+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
54.1%
(+.f64 lambda1 (atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
99.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
92.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
30.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
51.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
92.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
92.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
92.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
76.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
79.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
80.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
77.5%
(+.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.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
78.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
62.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
77.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.8%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
51.7%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
Compiler

Compiled 2 940 to 1 388 computations (52.8% saved)

simplify130.0ms (0.8%)

Memory
-15.8MiB live, 125.7MiB allocated; 15ms collecting garbage
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff1
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff1
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(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))))
cost-diff0
(+.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)))))
cost-diff0
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff1
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
061815
0112815
1204815
2422815
31026815
42431815
55225815
08020802
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 lambda1)
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
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 (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 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (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) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))))
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(*.f64 (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)))))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(pow.f64 lambda1 #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))
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 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(pow.f64 lambda2 #s(literal 3 binary64))
(*.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)))))
(cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))))
(sin.f64 lambda1)
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (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))))
(*.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 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 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) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #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 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 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(pow.f64 lambda1 #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))
(fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))
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))))
(cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(pow.f64 lambda2 #s(literal 3 binary64))
(*.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 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(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 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)

localize575.0ms (3.6%)

Memory
-1.8MiB live, 611.9MiB allocated; 93ms collecting garbage
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
accuracy9.058021655524142
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
accuracy12.691121762716747
(cos.f64 (-.f64 lambda1 lambda2))
accuracy26.87633685615995
(/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
accuracy29.09152871473581
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
accuracy0.19140625
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
accuracy0.5034179964119372
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy12.691121762716747
(cos.f64 (-.f64 lambda1 lambda2))
accuracy30.613359768196485
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
accuracy0.19140625
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.44041346223431044
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
accuracy13.082158855204195
(sin.f64 (-.f64 lambda1 lambda2))
accuracy24.76049932271724
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
accuracy30.940312426707145
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
accuracy0.17025375976844204
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy0.19140625
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
accuracy0.5034179964119372
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy12.691121762716747
(cos.f64 (-.f64 lambda1 lambda2))
Samples
468.0ms189×1valid
27.0ms66×0valid
2.0ms2valid
Compiler

Compiled 792 to 51 computations (93.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 416.0ms
ival-cos: 141.0ms (33.9% of total)
ival-mult: 95.0ms (22.8% of total)
ival-sin: 62.0ms (14.9% of total)
adjust: 53.0ms (12.7% of total)
ival-atan2: 20.0ms (4.8% of total)
ival-add: 17.0ms (4.1% of total)
ival-pow: 14.0ms (3.4% of total)
ival-div: 6.0ms (1.4% of total)
ival-sub: 4.0ms (1% of total)
ival-neg: 3.0ms (0.7% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series92.0ms (0.6%)

Memory
4.7MiB live, 150.3MiB allocated; 29ms collecting garbage
Counts
23 → 198
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))))
(cos.f64 (-.f64 lambda1 lambda2))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(sin.f64 (-.f64 lambda1 lambda2))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
Outputs
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (/ (cos lambda2) (pow lambda2 2)) (* (cos lambda2) (+ 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 lambda2))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda2 (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 2)) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda2 (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2)))) 1)))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) (pow lambda1 4)) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 lambda1))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2)))) (* -1 (pow lambda2 3))) (pow lambda1 3)))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (pow lambda2 3) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda2 4) lambda1)) (pow lambda2 3)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (pow lambda2 5)) (pow lambda2 5)) (pow lambda1 2))) (pow lambda2 3)) (/ (pow lambda2 4) lambda1)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (* lambda2 (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))) (* -1 (pow lambda2 6))) (pow lambda1 3))) (pow lambda2 3)) (+ (* -1 (/ (pow lambda2 5) (pow lambda1 2))) (+ (/ (pow lambda2 4) lambda1) (/ (pow lambda2 5) (pow lambda1 2))))) (pow lambda1 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* -1 (/ (+ (* -1 (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) lambda1))) (pow lambda1 3))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 2) lambda1)) (/ (pow lambda2 2) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 3) lambda1)) (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (/ (pow lambda2 5) lambda1)) (/ (pow lambda2 5) lambda1)) (* -1 (pow lambda2 4))) lambda1)) (pow lambda2 3)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (* -1 (/ (- (+ (/ (* lambda2 (+ (* -1 (pow lambda2 5)) (pow lambda2 5))) lambda1) (/ (pow lambda2 6) lambda1)) (+ (* -1 (pow lambda2 5)) (pow lambda2 5))) lambda1)) (* -1 (pow lambda2 4))) lambda1)) (pow lambda2 3)) (pow lambda1 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2)))) (/ (cos lambda1) (pow lambda1 2))))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (/ (pow lambda2 2) (pow lambda1 2)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2)))) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda2 3) (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda2 3) (+ (* lambda2 (- (/ (pow lambda2 2) (pow lambda1 5)) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda2 3) (+ (* lambda2 (- (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 6))) (/ 1 (pow lambda1 5)))) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2))))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (+ (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) (pow lambda2 4)) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (pow lambda1 3)) (/ (pow lambda1 4) lambda2)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (pow lambda1 3)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 2))) (+ (/ (pow lambda1 4) lambda2) (/ (pow lambda1 5) (pow lambda2 2))))) (pow lambda2 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda2 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2)))) (/ lambda1 lambda2)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda2 (- (+ 1 (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2)))) (* -1 (pow lambda1 3))) (pow lambda2 3)))) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)))) (pow lambda2 2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))))) lambda2)) (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (/ (pow lambda1 5) lambda2)) (/ (pow lambda1 5) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (* -1 (/ (- (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2)) (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) lambda1) lambda2)) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 3) lambda2)) (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) lambda1) lambda2)) 1)))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (pow lambda1 5) lambda2)) (+ (/ (pow lambda1 5) lambda2) (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2))) lambda2)) (pow lambda1 4)) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* 1/24 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))
Calls

12 calls:

TimeVariablePointExpression
15.0ms
phi2
@0
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))))
9.0ms
phi2
@inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))))
9.0ms
lambda1
@inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))))
7.0ms
lambda1
@-inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))))
7.0ms
phi2
@-inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (cos (- lambda1 lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))))

simplify170.0ms (1.1%)

Memory
30.3MiB live, 162.6MiB allocated; 15ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0104010200
130929623
092769035
Stop Event
iter limit
node limit
Counts
198 → 198
Calls
Call 1
Inputs
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (/ (cos lambda2) (pow lambda2 2)) (* (cos lambda2) (+ 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 lambda2))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda2 (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 2)) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda2 (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2)))) 1)))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) (pow lambda1 4)) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 lambda1))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2)))) (* -1 (pow lambda2 3))) (pow lambda1 3)))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (pow lambda2 3) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda2 4) lambda1)) (pow lambda2 3)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (pow lambda2 5)) (pow lambda2 5)) (pow lambda1 2))) (pow lambda2 3)) (/ (pow lambda2 4) lambda1)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (* lambda2 (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))) (* -1 (pow lambda2 6))) (pow lambda1 3))) (pow lambda2 3)) (+ (* -1 (/ (pow lambda2 5) (pow lambda1 2))) (+ (/ (pow lambda2 4) lambda1) (/ (pow lambda2 5) (pow lambda1 2))))) (pow lambda1 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* -1 (/ (+ (* -1 (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) lambda1))) (pow lambda1 3))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 2) lambda1)) (/ (pow lambda2 2) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 3) lambda1)) (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (/ (pow lambda2 5) lambda1)) (/ (pow lambda2 5) lambda1)) (* -1 (pow lambda2 4))) lambda1)) (pow lambda2 3)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (* -1 (/ (- (+ (/ (* lambda2 (+ (* -1 (pow lambda2 5)) (pow lambda2 5))) lambda1) (/ (pow lambda2 6) lambda1)) (+ (* -1 (pow lambda2 5)) (pow lambda2 5))) lambda1)) (* -1 (pow lambda2 4))) lambda1)) (pow lambda2 3)) (pow lambda1 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2)))) (/ (cos lambda1) (pow lambda1 2))))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (/ (pow lambda2 2) (pow lambda1 2)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2)))) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda2 3) (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda2 3) (+ (* lambda2 (- (/ (pow lambda2 2) (pow lambda1 5)) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda2 3) (+ (* lambda2 (- (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 6))) (/ 1 (pow lambda1 5)))) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2))))))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (+ (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) (pow lambda2 4)) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (pow lambda1 3)) (/ (pow lambda1 4) lambda2)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (pow lambda1 3)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 2))) (+ (/ (pow lambda1 4) lambda2) (/ (pow lambda1 5) (pow lambda2 2))))) (pow lambda2 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda2 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2)))) (/ lambda1 lambda2)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda2 (- (+ 1 (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2)))) (* -1 (pow lambda1 3))) (pow lambda2 3)))) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)))) (pow lambda2 2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))))) lambda2)) (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (/ (pow lambda1 5) lambda2)) (/ (pow lambda1 5) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (* -1 (/ (- (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2)) (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) lambda1) lambda2)) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 3) lambda2)) (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) lambda1) lambda2)) 1)))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (pow lambda1 5) lambda2)) (+ (/ (pow lambda1 5) lambda2) (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2))) lambda2)) (pow lambda1 4)) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* 1/24 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))
Outputs
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 lambda1 (neg.f64 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.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))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 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))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 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))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (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))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (/ (cos lambda2) (pow lambda2 2)) (* (cos lambda2) (+ 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (-.f64 (/.f64 (cos.f64 lambda2) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (cos.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (neg.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2)))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1) #s(literal 1/24 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (fma.f64 (-.f64 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 6 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 5 binary64)))) lambda1) lambda1) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 lambda2))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) lambda2)
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda2 (* -1 lambda1))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (-.f64 lambda2 lambda1))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda2 (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 2)) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (fma.f64 (-.f64 (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)) #s(literal 1 binary64)) lambda1 lambda2))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda2 (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2)))) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) lambda1) lambda1) #s(literal 1 binary64)) lambda1 lambda2))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 lambda2 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (*.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (*.f64 (fma.f64 (-.f64 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 6 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 5 binary64)))) lambda1) lambda1) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (neg.f64 lambda1) lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64)) (*.f64 (/.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) lambda1) (/.f64 (cos.f64 phi2) lambda1)) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda1 #s(literal 3 binary64))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) (pow lambda1 4)) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64)) (*.f64 (/.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) lambda1) (/.f64 (cos.f64 phi2) lambda1)) (fma.f64 (cos.f64 phi2) (+.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda2 #s(literal 6 binary64)) (*.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (pow.f64 lambda1 #s(literal 4 binary64)))) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda1 #s(literal 3 binary64))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 lambda1))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) lambda1)
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2)))) (* -1 (pow lambda2 3))) (pow lambda1 3)))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) lambda2 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64))) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) lambda1))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (pow lambda2 3) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (*.f64 lambda1 lambda1)))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda2 4) lambda1)) (pow lambda2 3)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) lambda1) #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (*.f64 lambda1 lambda1)))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (pow lambda2 5)) (pow lambda2 5)) (pow lambda1 2))) (pow lambda2 3)) (/ (pow lambda2 4) lambda1)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (-.f64 (+.f64 #s(literal 0 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 (pow.f64 lambda2 #s(literal 4 binary64)) lambda1)) (*.f64 lambda1 lambda1)))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (* lambda2 (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))) (* -1 (pow lambda2 6))) (pow lambda1 3))) (pow lambda2 3)) (+ (* -1 (/ (pow lambda2 5) (pow lambda1 2))) (+ (/ (pow lambda2 4) lambda1) (/ (pow lambda2 5) (pow lambda1 2))))) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (-.f64 (fma.f64 (/.f64 (neg.f64 (fma.f64 #s(literal 0 binary64) lambda2 (pow.f64 lambda2 #s(literal 6 binary64)))) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) lambda1)) (*.f64 lambda1 lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (neg.f64 lambda1) lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64)) (*.f64 (/.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) lambda1) (/.f64 (cos.f64 phi2) lambda1)) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda1 #s(literal 3 binary64))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* -1 (/ (+ (* -1 (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) lambda1))) (pow lambda1 3))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64)) (*.f64 (/.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) lambda1) (/.f64 (cos.f64 phi2) lambda1)) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (cos.f64 phi2) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda2 #s(literal 6 binary64)) (*.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) lambda1) (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 2) lambda1)) (/ (pow lambda2 2) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (-.f64 #s(literal 0 binary64) lambda2) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 3) lambda1)) (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (fma.f64 #s(literal 0 binary64) lambda2 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64))) lambda1) #s(literal 0 binary64)) (neg.f64 lambda1)) lambda2) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (/ (pow lambda2 5) lambda1)) (/ (pow lambda2 5) lambda1)) (* -1 (pow lambda2 4))) lambda1)) (pow lambda2 3)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (fma.f64 (/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) lambda1) #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (*.f64 lambda1 lambda1)))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (* -1 (/ (- (+ (/ (* lambda2 (+ (* -1 (pow lambda2 5)) (pow lambda2 5))) lambda1) (/ (pow lambda2 6) lambda1)) (+ (* -1 (pow lambda2 5)) (pow lambda2 5))) lambda1)) (* -1 (pow lambda2 4))) lambda1)) (pow lambda2 3)) (pow lambda1 2))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 (-.f64 (fma.f64 #s(literal 0 binary64) lambda2 (/.f64 (pow.f64 lambda2 #s(literal 6 binary64)) lambda1)) #s(literal 0 binary64)) lambda1) #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 4 binary64))) lambda1) #s(literal -1 binary64) (pow.f64 lambda2 #s(literal 3 binary64))) (*.f64 lambda1 lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (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))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (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))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 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))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2)))) (/ (cos lambda1) (pow lambda1 2))))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (cos.f64 lambda1)) (/.f64 (cos.f64 lambda1) (*.f64 lambda1 lambda1))) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) (cos.f64 phi2))) lambda2 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (-.f64 lambda1 lambda2))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (/ (pow lambda2 2) (pow lambda1 2)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (fma.f64 (-.f64 (*.f64 (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1)) #s(literal 1 binary64)) lambda2 lambda1))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2)))) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) lambda2) lambda2) #s(literal 1 binary64)) lambda2 lambda1))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda2 3) (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (fma.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda2 3) (+ (* lambda2 (- (/ (pow lambda2 2) (pow lambda1 5)) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (fma.f64 (-.f64 (/.f64 (*.f64 lambda2 lambda2) (pow.f64 lambda1 #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)))) lambda2 (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda2 3) (+ (* lambda2 (- (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 6))) (/ 1 (pow lambda1 5)))) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 6 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 5 binary64)))) lambda2) lambda2) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)))) lambda2 (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) (pow.f64 lambda2 #s(literal 3 binary64))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin.f64 lambda1))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2))))))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 lambda2 lambda2))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 phi2) (fma.f64 (/.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (cos.f64 phi2)) lambda2) (/.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) lambda2) (/.f64 (*.f64 (*.f64 (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64))) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda2 #s(literal 3 binary64))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (+ (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) (pow lambda2 4)) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+.f64 (neg.f64 (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda2 #s(literal 3 binary64))))) (fma.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 6 binary64))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (pow.f64 lambda2 #s(literal 4 binary64)))))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (pow lambda1 3)) (/ (pow lambda1 4) lambda2)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (-.f64 (+.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2)) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (pow lambda1 3)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 2))) (+ (/ (pow lambda1 4) lambda2) (/ (pow lambda1 5) (pow lambda2 2))))) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (-.f64 (fma.f64 (/.f64 (neg.f64 (fma.f64 #s(literal 0 binary64) lambda1 (pow.f64 lambda1 #s(literal 6 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 4 binary64)) #s(literal 0 binary64)) lambda2)) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) lambda2))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda2 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda1 2)) (pow lambda1 2)) (pow lambda2 2)))) (/ lambda1 lambda2)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) lambda2))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* lambda2 (- (+ 1 (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2)))) (* -1 (pow lambda1 3))) (pow lambda2 3)))) (+ (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (+ (/ lambda1 lambda2) (/ (pow lambda1 2) (pow lambda2 2))))))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (fma.f64 (/.f64 (neg.f64 (fma.f64 #s(literal 0 binary64) lambda1 (pow.f64 lambda1 #s(literal 3 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))) lambda2))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (/.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (/.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal -1 binary64) (+.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 3 binary64)))) (*.f64 lambda2 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (/.f64 (fma.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 4 binary64)) #s(literal 0 binary64)) lambda2) #s(literal -1 binary64) (fma.f64 (/.f64 (neg.f64 (fma.f64 #s(literal 0 binary64) lambda1 (pow.f64 lambda1 #s(literal 6 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)))) (*.f64 lambda2 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 lambda2 lambda2))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 phi2) (fma.f64 (/.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (cos.f64 phi2)) lambda2) (/.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) lambda2) (/.f64 (*.f64 (*.f64 (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64))) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda2 #s(literal 3 binary64))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))))) lambda2)) (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 phi2) (fma.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) #s(literal 0 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 6 binary64))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) lambda2) (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (/ (pow lambda1 5) lambda2)) (/ (pow lambda1 5) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal -1 binary64) (+.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 3 binary64)))) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (* -1 (/ (- (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2)) (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (/.f64 (+.f64 (/.f64 (fma.f64 (/.f64 (-.f64 (fma.f64 #s(literal 0 binary64) lambda1 (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) lambda2)) #s(literal 0 binary64)) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (/ lambda1 lambda2) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (neg.f64 lambda2)))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 2) lambda2)) (/ (pow lambda1 2) lambda2)) lambda1) lambda2)) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (-.f64 (/.f64 (-.f64 #s(literal 0 binary64) lambda1) (neg.f64 lambda2)) #s(literal 1 binary64)) (neg.f64 lambda2)))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda2 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow lambda1 3) lambda2)) (/ (* lambda1 (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) (+ (* -1 (pow lambda1 2)) (pow lambda1 2))) lambda2)) lambda1) lambda2)) 1)))))
#s(approx (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))) (*.f64 (-.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2) #s(literal -1 binary64) (fma.f64 #s(literal 0 binary64) lambda1 #s(literal 0 binary64))) (neg.f64 lambda2)) lambda1) (neg.f64 lambda2)) #s(literal 1 binary64)) (neg.f64 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (pow lambda1 5) lambda2)) (+ (/ (pow lambda1 5) lambda2) (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (/.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal -1 binary64) (+.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 3 binary64)))) (*.f64 lambda2 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2))) lambda2)) (pow lambda1 4)) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (/.f64 (+.f64 (/.f64 (fma.f64 (/.f64 (-.f64 (fma.f64 #s(literal 0 binary64) lambda1 (/.f64 (pow.f64 lambda1 #s(literal 6 binary64)) lambda2)) #s(literal 0 binary64)) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (-.f64 (*.f64 (*.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))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* 1/24 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (fma.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) phi2) phi2 (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (cos phi2) (cos.f64 phi2))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)))

rewrite207.0ms (1.3%)

Memory
-48.9MiB live, 145.0MiB allocated; 36ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
061510
0112336
1385336
23075336
08183325
Stop Event
iter limit
node limit
iter limit
Counts
23 → 277
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))))))
(cos.f64 (-.f64 lambda1 lambda2))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(sin.f64 (-.f64 lambda1 lambda2))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
Outputs
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (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 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (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 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (*.f64 (neg.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))))) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (neg.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)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))))
(+.f64 (*.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.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))))) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (*.f64 (neg.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 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (*.f64 (neg.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))))) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (neg.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)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))))
(+.f64 (*.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.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))))) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (*.f64 (neg.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 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (cos.f64 (-.f64 lambda1 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 (-.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)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (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 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (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 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (*.f64 (neg.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))))) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (neg.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)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))))
(+.f64 (*.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.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))))) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (*.f64 (neg.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 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.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))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (neg.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 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (neg.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 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (neg.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (neg.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))))))
(fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(fma.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 (neg.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))))))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.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 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (neg.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 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))))
(+.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(+.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (neg.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 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (cos.f64 phi1))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 4 binary64)))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 (neg.f64 lambda1) lambda1)))
(*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 3 binary64)))) (fma.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)) (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 2 binary64))))
(*.f64 (pow.f64 lambda1 #s(literal 3/2 binary64)) (/.f64 (pow.f64 lambda1 #s(literal 3/2 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(*.f64 (*.f64 lambda1 lambda1) (/.f64 lambda1 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(*.f64 lambda1 (/.f64 (*.f64 lambda1 lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (neg.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64)) (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(neg.f64 (/.f64 (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(*.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 4 binary64)))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 (neg.f64 lambda1) lambda1)))
(*.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (+.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 3 binary64)))) (fma.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)) (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 2 binary64))))
(*.f64 (pow.f64 lambda2 #s(literal 3/2 binary64)) (/.f64 (pow.f64 lambda2 #s(literal 3/2 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(*.f64 (*.f64 lambda2 lambda2) (/.f64 lambda2 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(*.f64 lambda2 (/.f64 (*.f64 lambda2 lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64))) (neg.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64)) (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(neg.f64 (/.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))

eval157.0ms (1%)

Memory
-6.6MiB live, 140.9MiB allocated; 16ms collecting garbage
Compiler

Compiled 38 433 to 2 935 computations (92.4% saved)

prune83.0ms (0.5%)

Memory
23.3MiB live, 113.7MiB allocated; 8ms collecting garbage
Pruning

43 alts after pruning (42 fresh and 1 done)

PrunedKeptTotal
New57929608
Fresh131326
Picked415
Done000
Total59643639
Accuracy
99.9%
Counts
639 → 43
Alt Table
Click to see full alt table
StatusAccuracyProgram
34.7%
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1))))
54.1%
(+.f64 lambda1 (atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
87.5%
(+.f64 lambda1 (atan2.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
87.5%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
92.8%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
80.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
78.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
81.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
98.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))))))
78.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
74.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
16.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (*.f64 (pow.f64 lambda2 #s(literal 3/2 binary64)) (/.f64 (pow.f64 lambda2 #s(literal 3/2 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
34.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (*.f64 (*.f64 lambda2 lambda2) (/.f64 lambda2 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
92.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
79.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
72.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))))
77.5%
(+.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)))))
79.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
68.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
79.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
68.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
98.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
98.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
98.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 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
77.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
78.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
62.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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)))))
65.0%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
24.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
77.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
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 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
98.9%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
98.8%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
51.7%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
Compiler

Compiled 3 796 to 2 109 computations (44.4% saved)

simplify116.0ms (0.7%)

Memory
3.3MiB live, 103.3MiB allocated; 9ms collecting garbage
Localize:

Found 20 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
063784
0114784
1217784
2469778
31164778
43258778
08135757
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 lambda1)
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (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)))) (fma.f64 (cos.f64 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
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) #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 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
(cos.f64 phi2)
phi2
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi1)
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)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 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)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 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)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(neg.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
(cos.f64 lambda2)
#s(literal 2 binary64)
(pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
(cos.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))))
(sin.f64 lambda1)
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (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)))) (fma.f64 (cos.f64 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
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) #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))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda1)
(cos.f64 phi1)
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)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 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)) (fma.f64 (sin.f64 lambda2) lambda1 (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)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 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)) (fma.f64 (sin.f64 lambda2) lambda1 (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)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(fma.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))
(*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi2))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(neg.f64 lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (/.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (/.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (/.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (/.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda1)
(cos.f64 lambda2)
#s(literal 2 binary64)
(pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
(cos.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)

localize726.0ms (4.6%)

Memory
-23.1MiB live, 726.3MiB allocated; 121ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.3740425293053261
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
accuracy0.5034179964119372
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))
accuracy12.911177765220872
(cos.f64 (+.f64 lambda2 lambda1))
accuracy13.082158855204195
(sin.f64 (-.f64 lambda1 lambda2))
accuracy0.19140625
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
accuracy0.5034179964119372
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
accuracy29.47695876087968
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))
accuracy30.613359768196485
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
accuracy0.19140625
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
accuracy0.44041346223431044
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
accuracy24.76049932271724
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
accuracy36.496311543145964
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
accuracy0.44041346223431044
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
accuracy13.082158855204195
(sin.f64 (-.f64 lambda1 lambda2))
accuracy24.76049932271724
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
accuracy29.255089818344455
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.14453125
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
accuracy0.17025375976844204
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
accuracy0.19140625
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
accuracy0.5034179964119372
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
Samples
516.0ms186×1valid
57.0ms69×0valid
2.0ms2valid
Compiler

Compiled 647 to 51 computations (92.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 464.0ms
ival-cos: 226.0ms (48.7% of total)
ival-sin: 75.0ms (16.2% of total)
adjust: 46.0ms (9.9% of total)
ival-mult: 45.0ms (9.7% of total)
ival-atan2: 31.0ms (6.7% of total)
ival-add: 21.0ms (4.5% of total)
ival-pow2: 8.0ms (1.7% of total)
ival-neg: 4.0ms (0.9% of total)
ival-sub: 4.0ms (0.9% of total)
ival-div: 3.0ms (0.6% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series80.0ms (0.5%)

Memory
32.8MiB live, 125.2MiB allocated; 6ms collecting garbage
Counts
29 → 187
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 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)))))
(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))))
#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) #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)))))
(atan2.f64 (*.f64 (cos.f64 phi2) #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 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
(cos.f64 phi2)
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(+.f64 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 (neg.f64 lambda1) (neg.f64 (sin.f64 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)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 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 (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
Outputs
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (- (* lambda1 (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (cos lambda2)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (cos lambda2)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi2)))))) (cos lambda2))) (+ (* -1/2 (* (cos phi2) (sin lambda2))) (* 1/6 (* (cos phi2) (sin lambda2))))))) (/ (* (cos phi2) (- (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (cos lambda2))) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (+ (* -1 (sin lambda2)) (* 1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (* (pow lambda1 2) (sin lambda2))) (* 1/2 (sin lambda2)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (sin lambda2)) (* 1/720 (* (pow lambda1 2) (sin lambda2))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos lambda2)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (+ (* -1/2 (cos lambda2)) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (+ (* -1/2 (cos lambda2)) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (cos lambda2))) (+ (* -1/2 (sin lambda2)) (* 1/6 (sin lambda2))))))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (+ (* -1/2 (cos lambda2)) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))) lambda1)))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* -1 (* (cos lambda1) (sin lambda2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos (+ lambda1 lambda2))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda2 (* -1 lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda2 (* -1 lambda1)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda2 (* -1 lambda1))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos (- lambda2 (* -1 lambda1)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (- lambda2 (* -1 lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (- (* lambda2 (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (cos lambda1)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (cos lambda1)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (cos lambda1))) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* (cos phi2) (sin lambda1))))))) (/ (* (cos phi2) (- (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (cos lambda1))) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* -1 (* lambda2 (cos lambda1)))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (* -1 (cos lambda1)) (* 1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* 1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (cos lambda1)) (* 1/5040 (* (pow lambda2 2) (cos lambda1)))))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (cos lambda1)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (+ (* -1/2 (cos lambda1)) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1)))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1 (cos lambda1)) (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (+ (* -1/2 (cos lambda1)) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (cos lambda1))) (+ (* -1/2 (sin lambda1)) (* 1/6 (sin lambda1))))))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (+ (* -1/2 (cos lambda1)) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda1 (* -1 lambda2))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos (- lambda1 (* -1 lambda2)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (- lambda1 (* -1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2)))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (+ (* -1/2 (/ (* (pow phi2 2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (+ (* (pow phi2 2) (+ (* -1/2 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))) (* 1/24 (/ (* (pow phi2 2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (+ (* (pow phi2 2) (+ (* -1/2 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (/ (* (pow phi2 2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))) (* 1/24 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
Calls

12 calls:

TimeVariablePointExpression
10.0ms
lambda2
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos lambda1)) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (sin (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))
8.0ms
lambda1
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos lambda1)) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (sin (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))
7.0ms
lambda1
@-inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos lambda1)) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (sin (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))
7.0ms
lambda2
@-inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos lambda1)) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (sin (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))
7.0ms
phi2
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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) (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (* (cos phi2) (sin (- lambda1 lambda2))) (* (neg (cos lambda1)) (sin lambda2)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (sin (- lambda1 lambda2)) (sin (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (* (cos phi2) (sin (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))

simplify247.0ms (1.6%)

Memory
24.0MiB live, 252.7MiB allocated; 101ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08626857
126956527
085336122
Stop Event
iter limit
node limit
Counts
187 → 187
Calls
Call 1
Inputs
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (- (* lambda1 (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (cos lambda2)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (cos lambda2)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi2)))))) (cos lambda2))) (+ (* -1/2 (* (cos phi2) (sin lambda2))) (* 1/6 (* (cos phi2) (sin lambda2))))))) (/ (* (cos phi2) (- (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (cos lambda2))) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (+ (* -1 (sin lambda2)) (* 1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (* (pow lambda1 2) (sin lambda2))) (* 1/2 (sin lambda2)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (sin lambda2)) (* 1/720 (* (pow lambda1 2) (sin lambda2))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos lambda2)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (+ (* -1/2 (cos lambda2)) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (+ (* -1/2 (cos lambda2)) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (cos lambda2))) (+ (* -1/2 (sin lambda2)) (* 1/6 (sin lambda2))))))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (+ (* -1/2 (cos lambda2)) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))) lambda1)))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* -1 (* (cos lambda1) (sin lambda2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos (+ lambda1 lambda2))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda2 (* -1 lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda2 (* -1 lambda1)))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda2 (* -1 lambda1))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos (- lambda2 (* -1 lambda1)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (- lambda2 (* -1 lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (- (* lambda2 (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (cos lambda1)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (cos lambda1)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (cos lambda1))) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* (cos phi2) (sin lambda1))))))) (/ (* (cos phi2) (- (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (cos lambda1))) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* -1 (* lambda2 (cos lambda1)))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (* -1 (cos lambda1)) (* 1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* 1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (cos lambda1)) (* 1/5040 (* (pow lambda2 2) (cos lambda1)))))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (cos lambda1)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (+ (* -1/2 (cos lambda1)) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1)))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1 (cos lambda1)) (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (+ (* -1/2 (cos lambda1)) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (cos lambda1))) (+ (* -1/2 (sin lambda1)) (* 1/6 (sin lambda1))))))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (+ (* -1/2 (cos lambda1)) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda1 (* -1 lambda2))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos (- lambda1 (* -1 lambda2)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (- lambda1 (* -1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2)))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (+ (* -1/2 (/ (* (pow phi2 2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (+ (* (pow phi2 2) (+ (* -1/2 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))) (* 1/24 (/ (* (pow phi2 2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (+ (* (pow phi2 2) (+ (* -1/2 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (/ (* (pow phi2 2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))) (* 1/24 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
Outputs
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 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))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 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))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (cos lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (cos.f64 lambda2))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (- (* lambda1 (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (cos lambda2)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2)))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (- (* lambda1 (- (+ (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (cos lambda2)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi2)))))) (cos lambda2))) (+ (* -1/2 (* (cos phi2) (sin lambda2))) (* 1/6 (* (cos phi2) (sin lambda2))))))) (/ (* (cos phi2) (- (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (cos lambda2))) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda2) 2)) (cos lambda2))) (* -1/2 (* (cos lambda2) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (/.f64 (-.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2)))) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) #s(literal -1/3 binary64)))) (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* -1 (sin lambda2))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (neg.f64 (sin.f64 lambda2)))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (+ (* -1 (sin lambda2)) (* 1/2 (* (pow lambda1 2) (sin lambda2))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 (sin.f64 lambda2) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (* (pow lambda1 2) (sin lambda2))) (* 1/2 (sin lambda2)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/24 binary64) (*.f64 lambda1 lambda1) #s(literal 1/2 binary64))) (*.f64 lambda1 lambda1) (neg.f64 (sin.f64 lambda2))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (sin lambda2)) (* 1/720 (* (pow lambda1 2) (sin lambda2))))))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/720 binary64) (*.f64 lambda1 lambda1) #s(literal -1/24 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) (*.f64 lambda1 lambda1) (neg.f64 (sin.f64 lambda2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1) #s(literal 1/24 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 lambda2) lambda1))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos lambda2)))
#s(approx (cos (+ lambda2 lambda1)) (cos.f64 lambda2))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))))
#s(approx (cos (+ lambda2 lambda1)) (fma.f64 (neg.f64 lambda1) (sin.f64 lambda2) (cos.f64 lambda2)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))))
#s(approx (cos (+ lambda2 lambda1)) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))))
#s(approx (cos (+ lambda2 lambda1)) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.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)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (cos lambda2)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (cos.f64 lambda2))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (+ (* -1/2 (cos lambda2)) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (fma.f64 (fma.f64 (-.f64 (-.f64 (neg.f64 (cos.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (cos.f64 lambda2)))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -1 (cos lambda2)) (* -1 (* lambda1 (+ (* -1 (/ (* (sin lambda2) (- (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (+ (* -1/2 (cos lambda2)) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (cos lambda2))) (+ (* -1/2 (sin lambda2)) (* 1/6 (sin lambda2))))))) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (+ (* -1/2 (cos lambda2)) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (fma.f64 (fma.f64 (-.f64 (neg.f64 (fma.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (/.f64 (-.f64 (-.f64 (neg.f64 (cos.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (neg.f64 (cos.f64 lambda2)))) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) #s(literal -1/3 binary64))) lambda1 (cos.f64 lambda2))) (fma.f64 (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2)) #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2))))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 (sin.f64 lambda2) lambda1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* -1 (* (cos lambda1) (sin lambda2)))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos (+ lambda1 lambda2))))
#s(approx (cos (+ lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (*.f64 (-.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64)) (neg.f64 lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64)) (neg.f64 lambda1)))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda2 (* -1 lambda1)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda2 (* -1 lambda1)))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (*.f64 (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64)) (neg.f64 lambda1)))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda2 (* -1 lambda1))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos (- lambda2 (* -1 lambda1)))))
#s(approx (cos (+ lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (- lambda2 (* -1 lambda1))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 1))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(literal 1 binary64))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda1 lambda2))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (fma.f64 lambda1 lambda2 #s(literal 1 binary64)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) lambda2 lambda1) lambda2 #s(literal 1 binary64)))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) #s(hole binary64 (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))))
#s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda2) #s(literal -1/6 binary64)) #s(literal 1/2 binary64)) lambda2 lambda1) lambda2 #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (- (* lambda2 (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (cos lambda1)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2) (/.f64 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (- (* lambda2 (- (+ (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (/ (* (cos phi2) (- (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (cos lambda1)) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (cos lambda1))) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* (cos phi2) (sin lambda1))))))) (/ (* (cos phi2) (- (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (cos lambda1))) (+ (* -1 (/ (* (cos phi2) (pow (sin lambda1) 2)) (cos lambda1))) (* -1/2 (* (cos lambda1) (cos phi2)))))) (* -1 (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (fma.f64 (fma.f64 (fma.f64 (neg.f64 (sin.f64 lambda1)) (/.f64 (-.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2) (/.f64 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1))))) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) #s(literal -1/3 binary64)))) (neg.f64 lambda2) (-.f64 (/.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda1)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2) (/.f64 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)))))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* -1 (* lambda2 (cos lambda1)))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) lambda2))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (* -1 (cos lambda1)) (* 1/6 (* (pow lambda2 2) (cos lambda1)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) lambda2 #s(literal -1 binary64))) lambda2))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/120 binary64) (*.f64 lambda2 lambda2) #s(literal 1/6 binary64))) (*.f64 lambda2 lambda2) (neg.f64 (cos.f64 lambda1))) lambda2))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* 1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (cos lambda1)) (* 1/5040 (* (pow lambda2 2) (cos lambda1)))))))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 #s(literal 1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal -1/120 binary64))) (*.f64 lambda2 lambda2) (*.f64 #s(literal 1/6 binary64) (cos.f64 lambda1))) (*.f64 lambda2 lambda2) (neg.f64 (cos.f64 lambda1))) lambda2))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (+ lambda2 lambda1)) (cos.f64 lambda1))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))))
#s(approx (cos (+ lambda2 lambda1)) (fma.f64 (neg.f64 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))))
#s(approx (cos (+ lambda2 lambda1)) (fma.f64 (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64)) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1))))))
#s(approx (cos (+ lambda2 lambda1)) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (cos lambda1)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (cos.f64 lambda1))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (+ (* -1/2 (cos lambda1)) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1)))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (fma.f64 (fma.f64 (-.f64 (-.f64 (neg.f64 (cos.f64 lambda1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1)))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (cos.f64 lambda1)))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1 (cos lambda1)) (* -1 (* lambda2 (+ (* -1 (/ (* (sin lambda1) (- (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (+ (* -1/2 (cos lambda1)) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (cos lambda1))) (+ (* -1/2 (sin lambda1)) (* 1/6 (sin lambda1))))))) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (+ (* -1/2 (cos lambda1)) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1)))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (fma.f64 (fma.f64 (-.f64 (neg.f64 (fma.f64 (fma.f64 (neg.f64 (sin.f64 lambda1)) (/.f64 (-.f64 (-.f64 (neg.f64 (cos.f64 lambda1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1)))) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (cos.f64 lambda1)))) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) #s(literal -1/3 binary64))) lambda2 (cos.f64 lambda1))) (fma.f64 (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1)) #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1))))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (- lambda1 (* -1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos (+ lambda2 lambda1)) #s(hole binary64 (cos (- lambda1 (* -1 lambda2)))))
#s(approx (cos (+ lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) #s(hole binary64 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (- lambda1 (* -1 lambda2))))))
#s(approx (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (-.f64 (*.f64 (*.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))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (+ 1 (+ (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)) (/ (* (cos phi2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi1) phi1) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2)) (*.f64 phi2 phi2))) (cos.f64 phi1)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) phi2) phi2) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2)))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (+ (* -1/2 (/ (* (pow phi2 2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (-.f64 (+.f64 (/.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (+ (* (pow phi2 2) (+ (* -1/2 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))) (* 1/24 (/ (* (pow phi2 2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (fma.f64 (/.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) #s(hole binary64 (- (+ (cos phi1) (+ (* (pow phi2 2) (+ (* -1/2 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (/ (* (pow phi2 2) (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)))) (cos (+ lambda1 lambda2)))) (* 1/24 (/ (- (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (* (pow (sin lambda1) 2) (pow (sin lambda2) 2))) (cos (+ lambda1 lambda2)))))))) (/ (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (cos (+ lambda1 lambda2))))) (/ (* (pow (sin lambda1) 2) (pow (sin lambda2) 2)) (cos (+ lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/24 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) phi2) phi2 (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (*.f64 phi2 phi2) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (cos phi2) (cos.f64 phi2))

rewrite220.0ms (1.4%)

Memory
-9.6MiB live, 179.9MiB allocated; 34ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
063550
0114463
1450447
23714447
08830433
Stop Event
iter limit
node limit
iter limit
Counts
29 → 345
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 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)))))
(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))))
#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) #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)))))
(atan2.f64 (*.f64 (cos.f64 phi2) #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 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
(cos.f64 phi2)
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(+.f64 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 (neg.f64 lambda1) (neg.f64 (sin.f64 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)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1))))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 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 (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
Outputs
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (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 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (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 (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)))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (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 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (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 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (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 (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (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 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (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 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (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 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (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 lambda1 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (-.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1) (*.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda2) (-.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1) (*.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1))))))
(fma.f64 (neg.f64 (neg.f64 lambda1)) (sin.f64 lambda2) (cos.f64 lambda2))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(fma.f64 lambda1 (neg.f64 (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda2))
(-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) (cos.f64 lambda2))) (/.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) (cos.f64 lambda2))))
(-.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) (neg.f64 lambda1)))
(-.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (cos.f64 lambda2) (*.f64 (neg.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1) (*.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)))))) (/.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1) (*.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)))))))
(+.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)) (cos.f64 lambda2))
(+.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1)))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(fma.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2)))) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2)))))
(+.f64 (cos.f64 phi1) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)))
(/.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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) #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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (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)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))) (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 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) lambda2)) (cos.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)) lambda2)) (cos.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2)) (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (neg.f64 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (PI.f64) lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))) (cos.f64 (+.f64 lambda2 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)))) (cos.f64 (+.f64 lambda2 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 (+.f64 (+.f64 (PI.f64) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 lambda2 (+.f64 (+.f64 (PI.f64) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) lambda1) (PI.f64)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) lambda1) (PI.f64)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) lambda1) (PI.f64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 (PI.f64) lambda1) (PI.f64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (-.f64 (neg.f64 lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) (cos.f64 (-.f64 lambda1 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (-.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 (PI.f64) lambda1))) (sin.f64 (+.f64 lambda2 (+.f64 (PI.f64) lambda1)))) #s(literal 2 binary64))
(neg.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (cos.f64 phi1))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2)))
(*.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 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 (+.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(sin.f64 (+.f64 (neg.f64 (+.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 lambda1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (+.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (+.f64 lambda1 lambda2)))
(cos.f64 (+.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 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 (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (fma.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (neg.f64 (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 4 binary64))) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(neg.f64 (/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2))))
(neg.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (pow.f64 (sin.f64 lambda2) #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.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)))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))

eval95.0ms (0.6%)

Memory
-4.2MiB live, 131.9MiB allocated; 13ms collecting garbage
Compiler

Compiled 29 258 to 2 997 computations (89.8% saved)

prune65.0ms (0.4%)

Memory
2.1MiB live, 102.2MiB allocated; 10ms collecting garbage
Pruning

52 alts after pruning (50 fresh and 2 done)

PrunedKeptTotal
New57124595
Fresh112637
Picked415
Done011
Total58652638
Accuracy
99.9%
Counts
638 → 52
Alt Table
Click to see full alt table
StatusAccuracyProgram
28.5%
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
54.1%
(+.f64 lambda1 (atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
87.5%
(+.f64 lambda1 (atan2.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
87.5%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
92.8%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
78.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
81.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
78.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
78.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (cos.f64 phi1))))))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
16.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (*.f64 (pow.f64 lambda2 #s(literal 3/2 binary64)) (/.f64 (pow.f64 lambda2 #s(literal 3/2 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
34.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (*.f64 (*.f64 lambda2 lambda2) (/.f64 lambda2 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
92.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
67.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))))))
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
79.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
72.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))))
77.5%
(+.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)))))
68.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
79.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
68.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
98.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
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)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)))))))
77.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 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
77.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
62.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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)))))
62.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
57.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
62.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
57.1%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
24.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
68.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
64.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 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)))))
77.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
61.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))))))
60.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
66.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
67.0%
(+.f64 lambda1 (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)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
57.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)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
99.6%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
98.9%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
98.8%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64)) (neg.f64 lambda1)))
51.7%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
Compiler

Compiled 4 773 to 2 650 computations (44.5% saved)

simplify168.0ms (1.1%)

Memory
-2.9MiB live, 134.8MiB allocated; 14ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
cost-diff16
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
cost-diff0
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff1
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(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))))
cost-diff0
(+.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)))))
cost-diff0
(sin.f64 (-.f64 lambda1 lambda2))
cost-diff0
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
094988
0150970
1278970
2599970
31545931
43874925
08164909
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 lambda1)
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+.f64 (cos.f64 lambda1) (cos.f64 phi1))
(cos.f64 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 (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 (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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)))
(*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(pow.f64 lambda1 #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(*.f64 lambda1 lambda1)
(cos.f64 phi2)
phi2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 2 binary64)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(cos.f64 phi1)
phi1
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))))
(sin.f64 lambda1)
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+.f64 (cos.f64 phi1) (cos.f64 lambda1))
(cos.f64 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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)))
(*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(pow.f64 lambda1 #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(*.f64 lambda1 lambda1)
(cos.f64 phi2)
phi2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (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 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(atan2.f64 (*.f64 (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 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 2 binary64)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(cos.f64 phi1)
phi1
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))

localize740.0ms (4.7%)

Memory
39.9MiB live, 698.5MiB allocated; 142ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy3.948670122200186
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
accuracy4.031572229190596
(-.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)))
accuracy12.691121762716747
(cos.f64 (-.f64 lambda2 lambda1))
accuracy13.082158855204195
(sin.f64 (-.f64 lambda1 lambda2))
accuracy9.058021655524142
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
accuracy12.691121762716747
(cos.f64 (-.f64 lambda1 lambda2))
accuracy29.09152871473581
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
accuracy31.42364977095481
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)))
accuracy0.4288569165343084
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
accuracy12.691121762716747
(cos.f64 (-.f64 lambda2 lambda1))
accuracy13.082158855204195
(sin.f64 (-.f64 lambda1 lambda2))
accuracy28.320072261278586
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
accuracy13.082158855204195
(sin.f64 (-.f64 lambda1 lambda2))
accuracy24.76049932271724
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
accuracy27.395366819406828
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
accuracy29.255089818344455
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.17025375976844204
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
accuracy0.19140625
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
accuracy0.19921875
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
accuracy0.5097870939355189
(fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
Samples
603.0ms200×1valid
32.0ms54×0valid
19.0ms2valid
Compiler

Compiled 810 to 77 computations (90.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 599.0ms
ival-cos: 150.0ms (25% of total)
ival-add: 103.0ms (17.2% of total)
adjust: 102.0ms (17% of total)
ival-mult: 76.0ms (12.7% of total)
ival-sin: 68.0ms (11.3% of total)
ival-sub: 37.0ms (6.2% of total)
ival-atan2: 27.0ms (4.5% of total)
ival-pow: 14.0ms (2.3% of total)
ival-div: 12.0ms (2% of total)
ival-pow2: 8.0ms (1.3% of total)
ival-neg: 2.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)

series181.0ms (1.1%)

Memory
0.6MiB live, 144.4MiB allocated; 16ms collecting garbage
Counts
30 → 294
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(cos.f64 phi2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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 (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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(-.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))
Outputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (/ (cos lambda2) (pow lambda2 2)) (* (cos lambda2) (+ 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/6 (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos lambda2)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos lambda2) (cos phi2)) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) (pow lambda1 4)) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3)))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (- lambda2 lambda1))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 lambda1))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2)))) (* -1 (pow lambda2 3))) (pow lambda1 3)))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* -1 (/ (+ (* -1 (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) lambda1))) (pow lambda1 3))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (+ lambda2 (* -1 lambda1)))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 2) lambda1)) (/ (pow lambda2 2) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 3) lambda1)) (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2)))) (/ (cos lambda1) (pow lambda1 2))))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* 1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (sin lambda1))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg lambda1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda1))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (/ (pow lambda2 2) (pow lambda1 2)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2)))) 1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2))))))))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (+ (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) (pow lambda2 4)) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (pow lambda1 3)) (/ (pow lambda1 4) lambda2)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (pow lambda1 3)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 2))) (+ (/ (pow lambda1 4) lambda2) (/ (pow lambda1 5) (pow lambda2 2))))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)))) (pow lambda2 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))))) lambda2)) (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (/ (pow lambda1 5) lambda2)) (/ (pow lambda1 5) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (* -1 (/ (- (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2)) (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (pow lambda1 5) lambda2)) (+ (/ (pow lambda1 5) lambda2) (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2))) lambda2)) (pow lambda1 4)) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 2/45 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/2 (/ (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/24 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/720 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))))) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow phi1 2)) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* 1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2))))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24))))) 1)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* 1/24 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2)) (- (cos (- lambda2 lambda1)) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (+ (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* -2/45 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2)))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/720 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1))))))))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (- lambda2 lambda1)))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* 1/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (pow (cos (- lambda2 lambda1)) 2)))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (cos (- lambda2 lambda1)) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))) (cos phi1))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))
Calls

12 calls:

TimeVariablePointExpression
47.0ms
lambda1
@0
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (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) (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (cos (- lambda1 lambda2)) (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))
37.0ms
phi2
@0
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (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) (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (cos (- lambda1 lambda2)) (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))
19.0ms
lambda1
@-inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (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) (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (cos (- lambda1 lambda2)) (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))
10.0ms
phi2
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (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) (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (cos (- lambda1 lambda2)) (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))
10.0ms
lambda2
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (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) (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (cos (- lambda1 lambda2)) (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))

simplify307.0ms (1.9%)

Memory
-66.5MiB live, 291.8MiB allocated; 130ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0155716637
1465216497
0842715682
Stop Event
iter limit
node limit
Counts
294 → 294
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (/ (cos lambda2) (pow lambda2 2)) (* (cos lambda2) (+ 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/6 (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos lambda2)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos lambda2) (cos phi2)) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) (pow lambda1 4)) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3)))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (- lambda2 lambda1))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 lambda1))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2)))) (* -1 (pow lambda2 3))) (pow lambda1 3)))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* -1 (/ (+ (* -1 (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) lambda1))) (pow lambda1 3))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1)))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (+ lambda2 (* -1 lambda1)))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 2) lambda1)) (/ (pow lambda2 2) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 3) lambda1)) (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2)))) (/ (cos lambda1) (pow lambda1 2))))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* 1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (sin lambda1))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg lambda1))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda1))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (/ (pow lambda2 2) (pow lambda1 2)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2)))) 1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2))))))))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (+ (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) (pow lambda2 4)) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (pow lambda1 3)) (/ (pow lambda1 4) lambda2)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (pow lambda1 3)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 2))) (+ (/ (pow lambda1 4) lambda2) (/ (pow lambda1 5) (pow lambda2 2))))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)))) (pow lambda2 2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))))) lambda2)) (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg (+ lambda1 (* -1 lambda2))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (/ (pow lambda1 5) lambda2)) (/ (pow lambda1 5) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (* -1 (/ (- (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2)) (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (pow lambda1 5) lambda2)) (+ (/ (pow lambda1 5) lambda2) (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2))) lambda2)) (pow lambda1 4)) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 2/45 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/2 (/ (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/24 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/720 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))))) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow phi1 2)) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* 1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2))))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24))))) 1)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* 1/24 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2)) (- (cos (- lambda2 lambda1)) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (+ (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* -2/45 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2)))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/720 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1))))))))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (- lambda2 lambda1)))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* 1/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (pow (cos (- lambda2 lambda1)) 2)))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (cos (- lambda2 lambda1)) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))) (cos phi1))))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))
Outputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2)))))) (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg lambda2))))
#s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (neg.f64 (sin.f64 lambda2)))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 #s(literal 1 binary64) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1)) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2.f64 (*.f64 (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos phi2) (- (/ (cos lambda2) (pow lambda2 2)) (* (cos lambda2) (+ 1/6 (/ 1 (pow lambda2 2))))))))) (* (cos lambda2) (cos phi2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (-.f64 (/.f64 (cos.f64 lambda2) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/6 binary64)) (cos.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda1 (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64) (fma.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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 (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda1 (- (+ (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/6 (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (+ (* -1/2 (/ (* (cos lambda2) (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))) (/ (* (cos phi2) (* (sin lambda2) (- (* 2 (/ (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2))))) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))) (/ (* (cos phi2) (* (sin lambda2) (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos lambda2) (cos phi2)) (cos phi1)) 2)))) (/ (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (- (* (cos lambda2) (cos phi2)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos lambda2) (cos phi2)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64) (fma.f64 (fma.f64 (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)) #s(literal -4/3 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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))))) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (sin.f64 lambda2)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 2 binary64) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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 (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (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 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 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)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 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)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (sin lambda2))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (sin.f64 lambda2) lambda1))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) (sin.f64 lambda2) (sin.f64 lambda2)) lambda1))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1)) (sin.f64 lambda2) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1)) (sin.f64 lambda2) (*.f64 #s(literal 1/120 binary64) (sin.f64 lambda2))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (cos phi2))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda1 2) (cos phi2)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 phi2) (cos.f64 phi2)) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda1 2) (cos phi2)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1)) (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (*.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (cos phi2) (* (pow lambda1 2) (+ (* -1/2 (cos phi2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos phi2))) (* 1/24 (cos phi2))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1)) (cos.f64 phi2) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi2))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (*.f64 lambda1 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos lambda2)))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (sin lambda2)))))
#s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))))
#s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))))
#s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos lambda2) (cos phi2)))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (*.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (*.f64 (fma.f64 (-.f64 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 6 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 5 binary64)))) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (*.f64 #s(literal 1 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (pow lambda1 3) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 lambda2 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (*.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (/ (pow lambda1 2) (pow lambda2 5)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (*.f64 (fma.f64 (-.f64 (/.f64 (*.f64 lambda1 lambda1) (pow.f64 lambda2 #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (* (pow lambda1 3) (+ (* lambda1 (- (* (pow lambda1 2) (+ (* -1 (/ lambda1 (pow lambda2 6))) (/ 1 (pow lambda2 5)))) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 6 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 5 binary64)))) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1 (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2))) (pow.f64 lambda1 #s(literal 3 binary64))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos lambda2) 2) (pow (cos phi2) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (fma.f64 (*.f64 #s(literal 2 binary64) lambda1) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (cos.f64 lambda2)) (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))))) lambda1 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi2) 2) (sin lambda2)))) (* lambda1 (+ (* lambda1 (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 (fma.f64 (*.f64 lambda1 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)) #s(literal -4/3 binary64)) (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) lambda1)) lambda1 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos lambda2) (cos phi2)) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (*.f64 (+.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (+.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (- lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (+.f64 (/.f64 (atan2.f64 (*.f64 (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (neg.f64 lambda1) lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64)) (*.f64 (/.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) lambda1) (/.f64 (cos.f64 phi2) lambda1)) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda1 #s(literal 3 binary64))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (+ (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) (pow lambda1 4)) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (pow lambda1 3)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (neg.f64 (*.f64 (/.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) lambda1) (/.f64 (cos.f64 phi2) lambda1))) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (fma.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (/.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 6 binary64))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (pow.f64 lambda2 #s(literal 5 binary64)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (pow.f64 lambda1 #s(literal 4 binary64))))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 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))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) lambda1)
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1)))) lambda1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (*.f64 (+.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1) #s(literal 1 binary64)) lambda1))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* (sin lambda1) (sin lambda2))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (- lambda2 lambda1))))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 lambda1))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) lambda1)
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64) #s(literal 1 binary64)) lambda1))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda2 2)) (pow lambda1 2)))) (/ lambda2 lambda1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (*.f64 (-.f64 (neg.f64 (fma.f64 (/.f64 #s(literal 0 binary64) lambda1) (/.f64 (*.f64 lambda2 lambda2) lambda1) #s(literal -1 binary64))) (/.f64 lambda2 lambda1)) lambda1))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* lambda1 (- (+ 1 (* -1 (/ (+ (* -1 (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2)))) (* -1 (pow lambda2 3))) (pow lambda1 3)))) (+ (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ (/ lambda2 lambda1) (/ (pow lambda2 2) (pow lambda1 2))))))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (*.f64 (-.f64 (fma.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)) lambda2 (pow.f64 lambda2 #s(literal 3 binary64)))) (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal -1 binary64) #s(literal 1 binary64)) (fma.f64 (/.f64 #s(literal -1 binary64) lambda1) (/.f64 (*.f64 lambda2 lambda2) lambda1) (fma.f64 (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1)))) lambda1))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (- lambda1 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (- lambda2 lambda1))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (neg.f64 lambda1) lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))) (/ (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 3))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64)) (*.f64 (/.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) lambda1) (/.f64 (cos.f64 phi2) lambda1)) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 lambda1 #s(literal 3 binary64))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (/ (* (pow lambda2 3) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (pow lambda1 2))) (+ (* -1 (/ (+ (* -1 (* (pow lambda2 4) (* (cos phi2) (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))) (* -1 (/ (* (cos phi2) (- (* -1/2 (* (pow lambda2 6) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))) (* -1 (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))) (+ (* -1 (pow lambda2 5)) (pow lambda2 5)))))) lambda1))) (pow lambda1 3))) (* (cos phi2) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64)) (*.f64 (/.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) lambda1) (/.f64 (cos.f64 phi2) lambda1)) (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2) (/.f64 (neg.f64 (fma.f64 (cos.f64 phi2) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 6 binary64))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (neg.f64 (*.f64 #s(literal 0 binary64) (pow.f64 lambda2 #s(literal 5 binary64)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))))) lambda1) (*.f64 (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1))))))) (neg.f64 (pow.f64 lambda1 #s(literal 3 binary64)))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 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 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1)))) lambda1)) 1)))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2)) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 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 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (/ (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1 binary64) lambda1 (neg.f64 lambda2))) (cos.f64 phi2)) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 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 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (+ lambda2 (* -1 lambda1)))))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 2) lambda1)) (/ (pow lambda2 2) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 lambda2 lambda2) lambda1)) lambda2) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (* -1 (* lambda1 (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (pow lambda2 3) lambda1)) (/ (* lambda2 (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) (+ (* -1 (pow lambda2 2)) (pow lambda2 2))) lambda1)) lambda2) lambda1)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)) lambda2 (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64))) lambda1) (*.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2))) (neg.f64 lambda1)) lambda2) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (neg (+ lambda2 (* -1 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda2 (* -1 lambda1))) (pow lambda1 2))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 (neg.f64 lambda1)) lambda2 (*.f64 lambda1 lambda1)))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (neg.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (neg.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (sin lambda1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* lambda2 (* (cos phi2) (- (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2)))) (/ (cos lambda1) (pow lambda1 2))))))))) (* (cos phi2) (sin lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (-.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (cos.f64 lambda1)) (/.f64 (cos.f64 lambda1) (*.f64 lambda1 lambda1))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda2 (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) lambda2 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal -2 binary64) (fma.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (neg.f64 (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (/.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 lambda1)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64)))) lambda2 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))) lambda2 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* lambda2 (- (+ (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* 1/6 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (/ (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (+ (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* -2 (/ (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2)))))) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (* -1/2 (/ (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))))) (* -1 (/ (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2)))) (pow (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1)))) (/ (pow (cos phi1) 2) (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal -2 binary64) (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 4/3 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (-.f64 (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (neg.f64 (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (/.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 lambda1)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (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 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))) lambda2 (-.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (/.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))) (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))))) (neg.f64 (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (/.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 lambda1)) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))))) lambda2 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (cos.f64 phi2)) (pow.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64)))))) lambda2 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (cos.f64 phi1)))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (sin lambda1))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (sin.f64 lambda1) lambda2))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)) (sin.f64 lambda1) (sin.f64 lambda1)) lambda2))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2)) (sin.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2))
#s(approx (* (sin lambda1) (sin lambda2)) #s(hole binary64 (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2)) (sin.f64 lambda1) (*.f64 #s(literal 1/120 binary64) (sin.f64 lambda1))) (*.f64 lambda2 lambda2) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg lambda1))))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))))
#s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (*.f64 #s(literal 1 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg lambda1))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 #s(literal 1 binary64) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (neg.f64 (sin.f64 lambda1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2)) lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* -1 lambda2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (fma.f64 #s(literal -1 binary64) lambda2 lambda1))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (/ (pow lambda2 2) (pow lambda1 2)) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (fma.f64 (-.f64 (*.f64 (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1)) #s(literal 1 binary64)) lambda2 lambda1))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (+ lambda1 (* lambda2 (- (* (pow lambda2 2) (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2)))) 1)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (fma.f64 (-.f64 (*.f64 (fma.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1))) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) lambda2 lambda1))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos lambda1)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (sin lambda1)))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (*.f64 #s(literal 1 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (sin lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (sin.f64 lambda1))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (* (cos lambda1) (+ 1/6 (/ 1 (pow lambda1 2))))))))))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/6 binary64)) (cos.f64 lambda1)) lambda2 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* -2 (* lambda2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (fma.f64 (*.f64 #s(literal -2 binary64) lambda2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.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)))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))))) lambda2 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* lambda2 (+ (* -2 (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1)) (*.f64 (fma.f64 (*.f64 lambda2 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 #s(literal 4/3 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda1))) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) (neg.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) lambda2)) lambda2 (-.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (neg lambda1))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 #s(literal 1 binary64) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi2) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi2) (sin (neg lambda1))))))))) (* (cos phi2) (cos (neg lambda1)))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (neg.f64 (sin.f64 lambda1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2)) lambda2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))) (/.f64 (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 lambda2 lambda2))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2) (fma.f64 (/.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (cos.f64 phi2)) lambda2) (/.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))) lambda2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))))) (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 3))) (+ (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))))) (pow lambda2 4)) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda1 lambda2) (+ (pow lambda1 2) (pow lambda2 2))))))) (pow lambda2 2)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+.f64 (neg.f64 (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 phi2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))))) (pow.f64 lambda2 #s(literal 3 binary64))))) (fma.f64 (cos.f64 phi2) (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))))))) (pow.f64 lambda2 #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda1 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 lambda2 lambda2)))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (/.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (pow lambda1 3)) (/ (pow lambda1 4) lambda2)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (/.f64 (-.f64 (fma.f64 (/.f64 #s(literal 0 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) lambda2) (pow.f64 lambda1 #s(literal 3 binary64))) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2)) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (- (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (pow lambda1 3)) (+ (* -1 (/ (pow lambda1 5) (pow lambda2 2))) (+ (/ (pow lambda1 4) lambda2) (/ (pow lambda1 5) (pow lambda2 2))))) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (/.f64 (fma.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) lambda1 (pow.f64 lambda1 #s(literal 6 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (/.f64 #s(literal -1 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) lambda2) (+.f64 (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) (*.f64 lambda2 lambda2)) (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2))))) (*.f64 lambda2 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (fma.f64 (/.f64 #s(literal 0 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) lambda2) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)))) (*.f64 lambda2 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1 (pow lambda1 6))) (pow lambda2 3))) (+ (* -1 (/ (+ (* -1 (pow lambda1 5)) (pow lambda1 5)) (pow lambda2 2))) (+ (* -1 (/ (pow lambda1 4) lambda2)) (pow lambda1 3)))) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (fma.f64 (/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) lambda1 (pow.f64 lambda1 #s(literal 6 binary64)))) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal 0 binary64) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) lambda2) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 4 binary64)) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))))) (*.f64 lambda2 lambda2)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)))
#s(approx (sin (- lambda1 lambda2)) #s(hole binary64 (sin (+ lambda1 (* -1 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) #s(hole binary64 (atan2 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
#s(approx (atan2 (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 lambda2 lambda2))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 phi2) (fma.f64 (/.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (cos.f64 phi2)) lambda2) (/.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))) lambda2) (/.f64 (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1))))) (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (+ (* -1 (* (cos phi2) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (+ (* -1 (/ (+ (* -1 (/ (* (cos phi2) (- (* -1 (* (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))) (+ (* -1 (pow lambda1 5)) (pow lambda1 5)))) (* -1/2 (* (pow lambda1 6) (sin (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))))) lambda2)) (* (pow lambda1 4) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2))))))) (pow lambda2 3))) (/ (* (pow lambda1 3) (* (cos phi2) (cos (/ (pow lambda2 3) (+ (* lambda2 (- lambda1 (* -1 lambda2))) (pow lambda1 2)))))) (pow lambda2 2))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 phi2) (fma.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)) lambda2) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) lambda2) (/.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (/.f64 (fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 lambda1 #s(literal 6 binary64))))) lambda2) (*.f64 (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (cos.f64 phi2)) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 (neg.f64 lambda2)) lambda2 (*.f64 lambda1 lambda1)))))) (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 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 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) #s(hole binary64 (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1)))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))))) (+.f64 (atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 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 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) lambda1))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) #s(hole binary64 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (/ (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2)) (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))))
#s(approx (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)))) (atan2.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 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 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
#s(approx (cos (- lambda2 lambda1)) #s(hole binary64 (cos (neg (+ lambda1 (* -1 lambda2))))))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (/ (pow lambda1 5) lambda2)) (/ (pow lambda1 5) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (/.f64 (+.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) lambda2) (*.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 4 binary64)))) (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) #s(hole binary64 (/ (+ (* -1 (/ (- (* -1 (/ (- (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2)) (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2)) (* -1 (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1))) (/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 5 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) lambda1 (pow.f64 lambda1 #s(literal 6 binary64))) lambda2)) (neg.f64 lambda2)) (neg.f64 (pow.f64 lambda1 #s(literal 4 binary64)))) (neg.f64 lambda2)) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (cos (- lambda1 lambda2)) #s(hole binary64 (cos (+ lambda1 (* -1 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (pow lambda1 5) lambda2)) (+ (/ (pow lambda1 5) lambda2) (pow lambda1 4))) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (/.f64 (pow.f64 lambda1 #s(literal 5 binary64)) lambda2) (pow.f64 lambda1 #s(literal 4 binary64))) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) (+ (/ (* lambda1 (+ (* -1 (pow lambda1 5)) (pow lambda1 5))) lambda2) (/ (pow lambda1 6) lambda2))) lambda2)) (pow lambda1 4)) lambda2)) (pow lambda1 3)) (pow lambda2 2))))
#s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 5 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 0 binary64) (pow.f64 lambda1 #s(literal 5 binary64))) lambda1 (pow.f64 lambda1 #s(literal 6 binary64))) lambda2)) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 4 binary64))) lambda2) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (*.f64 lambda2 lambda2)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (*.f64 (pow.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))) (*.f64 (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 phi1 phi1) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* -1 (* (pow phi1 2) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (fma.f64 (*.f64 (neg.f64 phi1) phi1) (fma.f64 #s(literal -1/24 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))) (*.f64 (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1/3 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))) (*.f64 (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 phi1 phi1) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi1 2) (- (+ (* (pow phi1 2) (- (* (pow phi1 2) (- (* 2/45 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/2 (/ (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (+ (* -1/24 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/720 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))))) (+ (* -1/24 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))) (+ (* 1/3 (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2)))) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))))))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (* 1/2 (/ (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1) (pow (- (* (cos phi2) (cos (- lambda2 lambda1))) 1) 2))))) (/ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (- (* (cos phi2) (cos (- lambda2 lambda1))) 1))) (/ 1 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (/.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))) (-.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/24 binary64) (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))) (*.f64 (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1/3 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))) (*.f64 #s(literal -1/24 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))) (*.f64 (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/24 binary64) (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))) (*.f64 (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1/3 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))) (*.f64 phi1 phi1) (-.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))) (*.f64 (/.f64 (-.f64 (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 phi1 phi1) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (* (cos lambda1) (cos phi2)))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos phi2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi1 phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ 1 (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1)) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (pow phi1 2)) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (fma.f64 phi1 phi1 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 phi1 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) 1)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 phi1 phi1) #s(literal -1/3 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 phi1 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (* (cos phi2) (cos (- lambda2 lambda1))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* 1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda2 lambda1)))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* -1/24 (pow phi1 2))))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (* (cos phi2) (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ 1/2 (* (pow phi1 2) (- (* 1/720 (pow phi1 2)) 1/24))))) 1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 phi1 phi1)) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 1 binary64)))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) #s(hole binary64 (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))))
#s(approx (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/24 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 phi2 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (cos phi2) #s(hole binary64 1))
#s(approx (cos phi2) #s(literal 1 binary64))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* -1/2 (pow phi2 2)))))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))))
#s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
#s(approx (cos phi2) #s(hole binary64 (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))))
#s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (sin (- lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(hole binary64 (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (cos (- lambda1 lambda2)))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(hole binary64 (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (-.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #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)))) (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)))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* 1/24 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.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)))) (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (- (+ (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (pow phi2 2) (+ (* -1/2 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))) (* 1/24 (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (fma.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)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64)) (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 #s(literal 1/24 binary64) (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))) (*.f64 phi2 phi2) (*.f64 (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (/ (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2)) (- (cos (- lambda2 lambda1)) (cos phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal -1 binary64) (fma.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 1/3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal 1/24 binary64)))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 phi2) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) #s(hole binary64 (- (+ (* (pow phi2 2) (- (+ (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (+ (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* (pow phi2 2) (- (* -2/45 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* 1/3 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2)))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (+ (* -1/720 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1))))))))) (+ (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (* -1 (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (- (cos (- lambda2 lambda1)) (cos phi1)))) (* 1/24 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))))) (* -1/2 (/ (* (cos (- lambda2 lambda1)) (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))) (pow (- (cos (- lambda2 lambda1)) (cos phi1)) 2))))) (/ (pow (cos (- lambda2 lambda1)) 2) (- (cos (- lambda2 lambda1)) (cos phi1)))) (/ (pow (cos phi1) 2) (- (cos (- lambda2 lambda1)) (cos phi1))))))
#s(approx (/ (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1))) (fma.f64 (fma.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal -1 binary64) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal -2/45 binary64) (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 1/3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal 1/24 binary64)))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/720 binary64))))) (*.f64 phi2 phi2) (*.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 1/3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal 1/24 binary64)))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (pow.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 phi2) (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (cos.f64 phi1)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (cos.f64 phi1)))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))))
#s(approx (+ (* (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (cos phi1))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda1)))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 lambda1)) #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow phi2 2) (cos lambda1)))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 lambda1)) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (*.f64 phi2 phi2) (cos.f64 phi1)) (cos.f64 lambda1)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) #s(hole binary64 (+ (cos lambda1) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda1)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 lambda1)) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (*.f64 phi2 phi2) (cos.f64 phi1)) (cos.f64 lambda1)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (cos (- lambda2 lambda1)))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) #s(hole binary64 (+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))))))
#s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (pow (cos (- lambda2 lambda1)) 2) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* -1 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (fma.f64 (*.f64 (neg.f64 phi2) phi2) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* 1/3 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 phi2 phi2)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (neg.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (*.f64 phi2 phi2) (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) #s(hole binary64 (- (+ (* (pow phi2 2) (+ (* -1 (pow (cos (- lambda2 lambda1)) 2)) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (pow (cos (- lambda2 lambda1)) 2)))))) (pow (cos (- lambda2 lambda1)) 2)) (pow (cos phi1) 2))))
#s(approx (- (pow (* (cos (- lambda2 lambda1)) (cos phi2)) 2) (pow (cos phi1) 2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -2/45 binary64) (*.f64 phi2 phi2)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (*.f64 phi2 phi2) (neg.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (*.f64 phi2 phi2) (-.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (cos (- lambda2 lambda1)) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) #s(hole binary64 (- (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1)))))))) (cos phi1))))
#s(approx (- (* (cos (- lambda2 lambda1)) (cos phi2)) (cos phi1)) (-.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))
#s(approx (cos phi2) #s(hole binary64 (cos phi2)))
#s(approx (cos phi2) (cos.f64 phi2))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) #s(hole binary64 (* (cos phi2) (- (* (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda1 lambda2)) (pow lambda1 2)))))))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)))

rewrite194.0ms (1.2%)

Memory
40.6MiB live, 172.7MiB allocated; 18ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
094778
0150567
1639501
04834497
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
30 → 495
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(cos.f64 phi2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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 (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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(-.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))
Outputs
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) 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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) #s(literal 3 binary64)))) (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (+.f64 phi2 lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64))) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))))
(+.f64 (*.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64))) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))))
(atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(fma.f64 (neg.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 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(fma.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 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(fma.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)))) (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (neg.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64))))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (/.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.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 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)))
(-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64))) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))))
(+.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(+.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64))))
(+.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (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) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) #s(literal 3 binary64)))) (fma.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (pow.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (+.f64 phi2 lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64))) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))))
(+.f64 (*.f64 (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64))) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (/.f64 (+.f64 (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.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 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.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 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (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))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(+.f64 (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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) (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 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 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.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 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.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 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (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))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(+.f64 (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (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 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.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 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.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 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(neg.f64 (/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (cos.f64 phi1))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64) (cos.f64 phi1))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (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))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(-.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (cos.f64 phi1)))
(+.f64 (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
#s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.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 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (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 (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))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 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)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (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 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (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)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(/.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 (+.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 phi2 lambda1) lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 phi2 lambda1) lambda2))) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.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 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 phi2 lambda1) lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 lambda2 (-.f64 lambda1 phi2)))) #s(literal 2 binary64) #s(literal 4 binary64)) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 phi2 lambda1) lambda2))) #s(literal 2 binary64) #s(literal 4 binary64)) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal -1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) #s(literal 1 binary64)))
(fma.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) #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))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal -1 binary64))
(+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) #s(literal 1 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))
(*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 2 binary64)) (pow.f64 lambda1 #s(literal 4 binary64)))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 (neg.f64 lambda1) lambda1)))
(*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 6 binary64)))) (fma.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)) (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 2 binary64))))
(*.f64 (pow.f64 lambda1 #s(literal 3/2 binary64)) (/.f64 (pow.f64 lambda1 #s(literal 3/2 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(*.f64 (*.f64 lambda1 lambda1) (/.f64 lambda1 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(*.f64 lambda1 (/.f64 (*.f64 lambda1 lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (neg.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64)) (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(neg.f64 (/.f64 (pow.f64 (neg.f64 lambda1) #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 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.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 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (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 (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))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 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)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (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 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (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)) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (sin.f64 lambda1))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (fabs.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fabs.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (exp.f64 (log.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))))
(-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1)))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (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 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (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)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))
(*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.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 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (sin.f64 lambda2) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (fma.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 phi1)))

eval205.0ms (1.3%)

Memory
-4.3MiB live, 191.3MiB allocated; 20ms collecting garbage
Compiler

Compiled 69 616 to 4 730 computations (93.2% saved)

prune124.0ms (0.8%)

Memory
12.7MiB live, 197.4MiB allocated; 21ms collecting garbage
Pruning

64 alts after pruning (61 fresh and 3 done)

PrunedKeptTotal
New89332925
Fresh162945
Picked415
Done022
Total91364977
Accuracy
99.9%
Counts
977 → 64
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.0%
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1) (*.f64 lambda1 lambda1))))
87.5%
(+.f64 lambda1 (atan2.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
88.2%
(+.f64 lambda1 (atan2.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
92.8%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
78.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
81.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
78.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
78.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (cos.f64 phi1))))))
77.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
34.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (*.f64 (*.f64 lambda2 lambda2) (/.f64 lambda2 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
92.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
92.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
92.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
92.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
92.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (cos.f64 phi1)))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))))
98.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.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)))))))
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
98.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))))
98.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))))
79.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
69.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 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2) #s(literal 1 binary64)))))
67.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))))
66.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
78.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
68.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
78.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.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))))))))
71.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64))))))
71.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)))))))
72.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))))
77.5%
(+.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)))))
66.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
79.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
98.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
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)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)))))))
77.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 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
77.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
62.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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)))))
62.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
57.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
62.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
64.5%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
63.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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
65.3%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
21.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
47.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 #s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 lambda2 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
66.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
63.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
61.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
77.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
61.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))))))
60.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
65.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
66.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
65.6%
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
56.8%
(+.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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
60.7%
(+.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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
99.6%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
98.9%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
98.8%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (+.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
51.7%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
Compiler

Compiled 9 583 to 2 495 computations (74% saved)

regimes323.0ms (2%)

Memory
-10.6MiB live, 234.8MiB allocated; 50ms collecting garbage
Counts
117 → 1
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (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 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos 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)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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))) #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)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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 (*.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (+.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 #s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 lambda2 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64)) (neg.f64 lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (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 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 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 (*.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 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (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)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.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) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.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 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi1))) (-.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 (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 (*.f64 lambda2 lambda2) (/.f64 lambda2 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (*.f64 (pow.f64 lambda2 #s(literal 3/2 binary64)) (/.f64 (pow.f64 lambda2 #s(literal 3/2 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (cos.f64 phi1) (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 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 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (-.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64)))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 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 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda1))))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 4 binary64))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 lambda1 (atan2.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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) (*.f64 lambda1 lambda1))))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 lambda1 (atan2.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
Calls

7 calls:

76.0ms
(cos.f64 phi1)
58.0ms
lambda1
51.0ms
(cos.f64 phi2)
47.0ms
phi2
30.0ms
lambda2
Results
AccuracySegmentsBranch
99.7%1(cos.f64 phi1)
99.7%1(cos.f64 phi2)
99.7%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes258.0ms (1.6%)

Memory
-22.5MiB live, 216.3MiB allocated; 17ms collecting garbage
Counts
87 → 1
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (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 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos 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)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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))) #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)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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 (*.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (+.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 #s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 lambda2 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64)) (neg.f64 lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (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 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 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 (*.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 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (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)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.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) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.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))))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Calls

7 calls:

77.0ms
phi2
41.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))))))
24.0ms
phi1
23.0ms
lambda1
21.0ms
lambda2
Results
AccuracySegmentsBranch
99.0%1(cos.f64 phi1)
99.0%1(cos.f64 phi2)
99.0%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
99.0%1lambda1
99.0%1lambda2
99.0%1phi1
99.0%1phi2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes134.0ms (0.8%)

Memory
36.8MiB live, 180.1MiB allocated; 15ms collecting garbage
Counts
74 → 1
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (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 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos 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)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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))) #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)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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 (*.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (+.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 #s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 lambda2 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64)) (neg.f64 lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (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 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 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 (*.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 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (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)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.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) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))))
Calls

7 calls:

21.0ms
(cos.f64 phi2)
20.0ms
lambda2
20.0ms
phi2
18.0ms
lambda1
18.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Results
AccuracySegmentsBranch
98.9%1(cos.f64 phi1)
98.9%1lambda1
98.9%1lambda2
98.9%1phi1
98.9%1phi2
98.9%1(cos.f64 phi2)
98.9%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes149.0ms (0.9%)

Memory
-38.6MiB live, 154.1MiB allocated; 21ms collecting garbage
Counts
71 → 1
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (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 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos 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)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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))) #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)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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 (*.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (+.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) #s(literal 1 binary64)) lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 #s(approx (sin (/ (pow lambda1 3) (+ (* (+ lambda2 lambda1) lambda2) (* lambda1 lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 lambda2 lambda2))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 (-.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) #s(literal 1 binary64)) (neg.f64 lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (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 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 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 (*.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 #s(approx (cos phi2) #s(literal 1 binary64)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (- (* (sin (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (cos (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))) (* (cos (/ (pow lambda1 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1)))) (sin (/ (pow lambda2 3) (+ (* lambda2 (+ lambda2 lambda1)) (* lambda1 lambda1))))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda2 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (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)) #s(approx (+ (* (neg lambda1) (neg (sin lambda2))) (cos lambda2)) (*.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.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:

36.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
19.0ms
phi2
18.0ms
lambda2
17.0ms
phi1
17.0ms
lambda1
Results
AccuracySegmentsBranch
98.9%1(cos.f64 phi1)
98.9%1(cos.f64 phi2)
98.9%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.9%1lambda1
98.9%1lambda2
98.9%1phi1
98.9%1phi2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes107.0ms (0.7%)

Memory
5.5MiB live, 95.8MiB allocated; 8ms collecting garbage
Counts
43 → 1
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (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 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos 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)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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))) #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)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (/ (- (pow (* (cos lambda1) (cos lambda2)) 2) (pow (* (sin lambda2) (sin lambda1)) 2)) (cos (+ lambda2 lambda1))))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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 (*.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)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
Calls

7 calls:

27.0ms
lambda1
25.0ms
(cos.f64 phi1)
11.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
11.0ms
phi2
11.0ms
lambda2
Results
AccuracySegmentsBranch
98.4%1(cos.f64 phi1)
98.4%1(cos.f64 phi2)
98.4%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.4%1lambda1
98.4%1lambda2
98.4%1phi1
98.4%1phi2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes83.0ms (0.5%)

Memory
47.0MiB live, 91.7MiB allocated; 3ms collecting garbage
Counts
39 → 3
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (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 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos 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)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.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))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #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))) #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)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 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 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
Calls

7 calls:

22.0ms
lambda1
10.0ms
lambda2
10.0ms
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
phi1
Results
AccuracySegmentsBranch
92.4%3(cos.f64 phi1)
90.6%2(cos.f64 phi2)
91.4%4(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
80.1%1lambda1
89.7%3lambda2
91.8%3phi1
90.5%2phi2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes57.0ms (0.4%)

Memory
-43.2MiB live, 10.2MiB allocated; 6ms collecting garbage
Counts
32 → 3
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (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 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos 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)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
Calls

1 calls:

56.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
92.3%3(cos.f64 phi1)
Compiler

Compiled 2 to 5 computations (-150% saved)

regimes17.0ms (0.1%)

Memory
27.8MiB live, 27.8MiB allocated; 0ms collecting garbage
Counts
31 → 3
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (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 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos 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)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
Calls

2 calls:

8.0ms
(cos.f64 phi1)
8.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
89.0%2(cos.f64 phi2)
92.1%3(cos.f64 phi1)
Compiler

Compiled 4 to 10 computations (-150% saved)

regimes12.0ms (0.1%)

Memory
-20.7MiB live, 23.1MiB allocated; 4ms collecting garbage
Counts
30 → 3
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (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 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos 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)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
Calls

1 calls:

10.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
92.1%3(cos.f64 phi1)
Compiler

Compiled 2 to 5 computations (-150% saved)

regimes15.0ms (0.1%)

Memory
35.2MiB live, 35.2MiB allocated; 0ms collecting garbage
Counts
26 → 3
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
Calls

2 calls:

7.0ms
phi2
7.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
90.4%3phi2
91.9%3(cos.f64 phi1)
Compiler

Compiled 3 to 9 computations (-200% saved)

regimes32.0ms (0.2%)

Memory
-29.9MiB live, 60.9MiB allocated; 6ms collecting garbage
Counts
25 → 2
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) (+.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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Calls

4 calls:

9.0ms
phi2
8.0ms
(cos.f64 phi1)
7.0ms
phi1
6.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
88.7%2phi2
88.7%2(cos.f64 phi2)
79.6%1phi1
82.3%2(cos.f64 phi1)
Compiler

Compiled 6 to 18 computations (-200% saved)

regimes33.0ms (0.2%)

Memory
10.2MiB live, 66.5MiB allocated; 5ms collecting garbage
Counts
21 → 2
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
Calls

5 calls:

9.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
6.0ms
phi2
6.0ms
lambda2
5.0ms
(cos.f64 phi2)
5.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
79.6%1(cos.f64 phi1)
82.2%2lambda2
81.4%2(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
79.6%1(cos.f64 phi2)
79.6%1phi2
Compiler

Compiled 26 to 32 computations (-23.1% saved)

regimes58.0ms (0.4%)

Memory
17.2MiB live, 63.2MiB allocated; 4ms collecting garbage
Counts
20 → 2
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda1) (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))) #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 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (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 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #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))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64))))))
Calls

7 calls:

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))))))
6.0ms
phi2
6.0ms
lambda2
6.0ms
phi1
5.0ms
lambda1
Results
AccuracySegmentsBranch
73.4%2(cos.f64 phi1)
70.7%2(cos.f64 phi2)
70.5%2phi2
73.3%2phi1
73.6%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))))))
68.0%1lambda1
74.7%4lambda2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes25.0ms (0.2%)

Memory
-39.6MiB live, 52.9MiB allocated; 5ms collecting garbage
Counts
7 → 1
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
Calls

7 calls:

6.0ms
(cos.f64 phi1)
5.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))))))
3.0ms
phi1
3.0ms
phi2
Results
AccuracySegmentsBranch
68.0%1lambda1
68.0%1phi2
68.0%1(cos.f64 phi2)
68.0%1lambda2
68.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))))))
68.0%1phi1
68.0%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes14.0ms (0.1%)

Memory
28.0MiB live, 28.0MiB allocated; 0ms collecting garbage
Counts
4 → 1
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
Calls

7 calls:

2.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
2.0ms
phi1
2.0ms
lambda2
2.0ms
phi2
2.0ms
lambda1
Results
AccuracySegmentsBranch
66.5%1phi2
66.5%1(cos.f64 phi1)
66.5%1lambda1
66.5%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
66.5%1(cos.f64 phi2)
66.5%1lambda2
66.5%1phi1
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes14.0ms (0.1%)

Memory
-25.7MiB live, 26.0MiB allocated; 4ms collecting garbage
Counts
3 → 3
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
Outputs
(+.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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
Calls

7 calls:

4.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
phi1
2.0ms
lambda2
2.0ms
phi2
Results
AccuracySegmentsBranch
60.7%1phi2
60.7%1(cos.f64 phi1)
60.7%1(cos.f64 phi2)
60.7%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
60.7%1lambda1
64.4%3lambda2
60.7%1phi1
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes10.0ms (0.1%)

Memory
25.7MiB live, 25.7MiB allocated; 0ms collecting garbage
Counts
2 → 1
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
Calls

7 calls:

1.0ms
phi1
1.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
1.0ms
lambda2
1.0ms
phi2
1.0ms
lambda1
Results
AccuracySegmentsBranch
56.8%1lambda1
56.8%1(cos.f64 phi1)
56.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
56.8%1phi2
56.8%1phi1
56.8%1(cos.f64 phi2)
56.8%1lambda2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes9.0ms (0.1%)

Memory
-28.4MiB live, 18.7MiB allocated; 2ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
Outputs
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
Calls

7 calls:

2.0ms
(cos.f64 phi2)
1.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
1.0ms
phi1
1.0ms
lambda1
1.0ms
lambda2
Results
AccuracySegmentsBranch
51.7%1phi1
51.7%1(cos.f64 phi2)
51.7%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
51.7%1lambda2
51.7%1phi2
51.7%1(cos.f64 phi1)
51.7%1lambda1
Compiler

Compiled 28 to 40 computations (-42.9% saved)

bsearch1.0ms (0%)

Memory
1.7MiB live, 1.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9997899222725614
0.9999938313029937
0.0ms
0.6969035273256139
0.7027885643647442
Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9997899222725614
0.9999938313029937
0.0ms
0.7687670580333951
0.784851509448133
Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.997190355010771
0.9986533535385799
0.0ms
0.7687670580333951
0.784851509448133
Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.997190355010771
0.9986533535385799
0.0ms
0.7687670580333951
0.784851509448133
Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch1.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.997190355010771
0.9986533535385799
0.0ms
0.7687670580333951
0.784851509448133
Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9999999999912687
0.9999999999999497
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch52.0ms (0.3%)

Memory
19.3MiB live, 66.1MiB allocated; 1ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
49.0ms
51.87996620389167
31709907.79002337
Samples
26.0ms37×1valid
17.0ms107×0valid
Compiler

Compiled 671 to 489 computations (27.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 38.0ms
ival-cos: 22.0ms (58.3% of total)
ival-sin: 6.0ms (15.9% of total)
adjust: 3.0ms (7.9% of total)
ival-mult: 2.0ms (5.3% of total)
ival-add: 2.0ms (5.3% of total)
ival-atan2: 2.0ms (5.3% of total)
ival-sub: 1.0ms (2.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9793977021139655
0.9900353850026328
Compiler

Compiled 23 to 21 computations (8.7% saved)

bsearch55.0ms (0.3%)

Memory
0.1MiB live, 45.5MiB allocated; 6ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
18.0ms
3.2644022679839396e-89
6.309279117611642e-89
34.0ms
-6.367624380364822e-219
-6.714164957717692e-221
Samples
25.0ms41×1valid
19.0ms135×0valid
Compiler

Compiled 980 to 604 computations (38.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-cos: 21.0ms (59% of total)
ival-sin: 4.0ms (11.2% of total)
adjust: 3.0ms (8.4% of total)
ival-mult: 3.0ms (8.4% of total)
ival-atan2: 2.0ms (5.6% of total)
ival-add: 2.0ms (5.6% of total)
ival-sub: 1.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify64.0ms (0.4%)

Memory
-14.4MiB live, 36.5MiB allocated; 13ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01611148
12331148
23801148
37591148
415841148
538091148
Stop Event
node limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3152519739159347/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 2251799813673989/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda2 #s(literal 82 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -7630936927276445/1589778526515925949592554996185602616583051281527497329806389286938676175550849931602819490640533993421299436233862218963119697965173569936838950169642169486545361895445350303283471652486756807501069311174365664000914275178307643244544 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) (if (<=.f64 lambda2 #s(literal 2436842279489451/71671831749689734737838152978190216899892655911508785116799651230841339877765150252188079784691427704832 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda1) (cos lambda2))))) (fma.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3152519739159347/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 2251349453722511/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 3512807709348987/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (if (<=.f64 (cos.f64 phi1) #s(literal 4494592428115755/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 2251799813673989/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda2 #s(literal 82 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))))))
(if (<=.f64 (cos.f64 phi1) #s(literal 2206763817411543/2251799813685248 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(if (<=.f64 lambda2 #s(literal -7630936927276445/1589778526515925949592554996185602616583051281527497329806389286938676175550849931602819490640533993421299436233862218963119697965173569936838950169642169486545361895445350303283471652486756807501069311174365664000914275178307643244544 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) (if (<=.f64 lambda2 #s(literal 2436842279489451/71671831749689734737838152978190216899892655911508785116799651230841339877765150252188079784691427704832 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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))))
(if (or (<=.f64 lambda2 #s(literal -7630936927276445/1589778526515925949592554996185602616583051281527497329806389286938676175550849931602819490640533993421299436233862218963119697965173569936838950169642169486545361895445350303283471652486756807501069311174365664000914275178307643244544 binary64)) (not (<=.f64 lambda2 #s(literal 2436842279489451/71671831749689734737838152978190216899892655911508785116799651230841339877765150252188079784691427704832 binary64)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (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)))) #s(approx (+ (* (cos lambda1) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) lambda1)

derivations828.0ms (5.2%)

Memory
11.8MiB live, 623.4MiB allocated; 85ms collecting garbage
Stop Event
fuel
Compiler

Compiled 1 148 to 163 computations (85.8% saved)

preprocess148.0ms (0.9%)

Memory
13.2MiB live, 103.4MiB allocated; 11ms collecting garbage
Remove

(abs phi1)

(abs phi2)

Compiler

Compiled 2 736 to 602 computations (78% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...