Destination given bearing on a great circle

Time bar (total: 11.7s)

start0.0ms (0%)

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

analyze2.6s (22.5%)

Memory
-49.3MiB live, 1 221.2MiB allocated; 1.8s 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
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
1.6%1.6%98.2%0.2%0%0%0%11
1.6%1.6%98.2%0.2%0%0%0%12
Compiler

Compiled 35 to 25 computations (28.6% saved)

sample2.8s (24.4%)

Memory
79.8MiB live, 2 102.5MiB allocated; 281ms collecting garbage
Samples
2.4s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 2.0s
ival-sin: 674.0ms (33.8% of total)
ival-cos: 548.0ms (27.5% of total)
ival-mult: 353.0ms (17.7% of total)
ival-asin: 120.0ms (6% of total)
ival-atan2: 118.0ms (5.9% of total)
ival-sub: 91.0ms (4.6% of total)
ival-add: 78.0ms (3.9% of total)
ival-true: 7.0ms (0.4% of total)
ival-assert: 4.0ms (0.2% of total)
adjust: 3.0ms (0.2% of total)
Bogosity

explain483.0ms (4.1%)

Memory
-75.8MiB live, 367.8MiB allocated; 134ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
102(2.8374493154366856e+68 -2.0235290401321773e+233 1.1017843882262859e+83 3.088075082382362e+40 4.0182387665202176e+273)2(-4.927849160789527e-77 1.477213030076344e+240 4.034544500285069e+289 -3902731.1006577564 -1.556264710797817e-258)(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
00-0-(cos.f64 theta)
00-0-theta
00-0-(sin.f64 theta)
00-0-(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
00-0-(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
00-0-delta
00-0-(sin.f64 phi1)
00-0-(*.f64 (sin.f64 phi1) (cos.f64 delta))
00-0-lambda1
00-0-(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
00-0-(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
00-0-(*.f64 (sin.f64 theta) (sin.f64 delta))
00-0-phi1
00-0-(*.f64 (cos.f64 phi1) (sin.f64 delta))
00-0-(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
00-0-(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
00-0-(sin.f64 delta)
00-0-(sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
00-0-(cos.f64 delta)
00-0-(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
-.f64(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))cancellation22
Confusion
Predicted +Predicted -
+10
-1254
Precision
0.5
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+100
-12252
Precision?
0.25
Recall?
1.0
Freqs
test
numberfreq
0254
12
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
139.0ms512×0valid
Compiler

Compiled 431 to 73 computations (83.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 110.0ms
ival-sin: 45.0ms (41.1% of total)
ival-cos: 29.0ms (26.5% of total)
ival-mult: 17.0ms (15.5% of total)
ival-asin: 6.0ms (5.5% of total)
ival-add: 5.0ms (4.6% of total)
ival-atan2: 4.0ms (3.6% of total)
ival-sub: 2.0ms (1.8% of total)
ival-true: 1.0ms (0.9% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

preprocess179.0ms (1.5%)

Memory
18.3MiB live, 108.5MiB allocated; 8ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0179677
1422672
2873670
31685670
43411670
56238670
02233
04033
17333
213733
330033
466533
5163433
6409033
7730233
0824132
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 delta))) lambda1)
Symmetry

(abs phi2)

Compiler

Compiled 33 to 23 computations (30.3% saved)

eval0.0ms (0%)

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

Compiled 0 to 5 computations (-∞% saved)

prune1.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Compiler

Compiled 33 to 23 computations (30.3% saved)

simplify161.0ms (1.4%)

Memory
15.0MiB live, 111.5MiB allocated; 13ms collecting garbage
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
cost-diff1
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022197
040197
173197
2137197
3300197
4665197
51634197
64090197
77302197
08241190
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (cos.f64 delta))
(cos.f64 delta)
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(*.f64 (sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (sin.f64 phi1))
(sin.f64 phi1)
(sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)

localize92.0ms (0.8%)

Memory
-19.2MiB live, 71.9MiB allocated; 7ms collecting garbage
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.18359375
(*.f64 (cos.f64 phi1) (sin.f64 delta))
accuracy0.28744125976844204
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
accuracy0.3222150583118237
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
accuracy0.5895012858745693
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
Samples
78.0ms256×0valid
Compiler

Compiled 199 to 25 computations (87.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 64.0ms
ival-sin: 32.0ms (50.4% of total)
ival-cos: 14.0ms (22% of total)
ival-mult: 9.0ms (14.2% of total)
ival-asin: 3.0ms (4.7% of total)
ival-add: 2.0ms (3.1% of total)
ival-atan2: 2.0ms (3.1% of total)
ival-sub: 1.0ms (1.6% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series32.0ms (0.3%)

Memory
34.0MiB live, 34.0MiB allocated; 0ms collecting garbage
Counts
8 → 67
Calls
Call 1
Inputs
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* (cos theta) (sin delta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(* (cos phi1) (* (sin delta) (sin theta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (cos phi1) (sin delta))
(sin phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(pow (sin phi1) 2)
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
Calls

15 calls:

TimeVariablePointExpression
5.0ms
theta
@inf
((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (cos phi1) (sin delta)))
4.0ms
phi1
@inf
((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (cos phi1) (sin delta)))
3.0ms
delta
@inf
((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (cos phi1) (sin delta)))
3.0ms
delta
@-inf
((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (cos phi1) (sin delta)))
3.0ms
delta
@0
((+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (* (cos phi1) (sin delta)))

simplify220.0ms (1.9%)

Memory
-19.4MiB live, 116.8MiB allocated; 29ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02771481
110741358
249611342
083721241
Stop Event
iter limit
node limit
Counts
67 → 66
Calls
Call 1
Inputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* (cos theta) (sin delta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(* (cos phi1) (* (sin delta) (sin theta)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (cos phi1) (sin delta))
(sin phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(pow (sin phi1) 2)
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* (cos theta) (sin delta))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))
(fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))
(+ (* phi1 (+ (cos delta) (* -1/2 (* phi1 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) phi1)) (sin.f64 delta) (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* phi1 (cos delta))))))) (* (cos theta) (sin delta)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 delta)) phi1 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 theta)) (sin.f64 delta))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta)) #s(literal 2/3 binary64)) (cos.f64 delta)) phi1)) phi1 (cos.f64 delta))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* delta (* (cos phi1) (cos theta))))
(fma.f64 (*.f64 delta (cos.f64 theta)) (cos.f64 phi1) (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* -1/2 (* delta (sin phi1))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))
(+ (sin phi1) (* delta (+ (* delta (+ (* -1/2 (sin phi1)) (* -1/6 (* delta (* (cos phi1) (cos theta)))))) (* (cos phi1) (cos theta)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) delta)) (cos.f64 theta) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) delta (*.f64 (cos.f64 theta) (cos.f64 phi1))) delta (sin.f64 phi1))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (*.f64 delta (sin.f64 theta)) (cos.f64 phi1)))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1)) (*.f64 (pow.f64 delta #s(literal 4 binary64)) (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) delta)
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) delta)) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal -1/2 binary64))) delta)) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* delta (cos phi1))
(*.f64 (cos.f64 phi1) delta)
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (cos.f64 phi1)) delta)
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(fma.f64 (pow.f64 delta #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) delta))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (cos.f64 phi1) (*.f64 (pow.f64 delta #s(literal 4 binary64)) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))))) delta)
(+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(fma.f64 (*.f64 (*.f64 theta theta) (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 theta theta) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(+ (* (cos delta) (sin phi1)) (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 (*.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) theta)
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (pow.f64 theta #s(literal 3 binary64)) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1)))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 theta theta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (pow.f64 theta #s(literal 4 binary64)) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal -1/5040 binary64) #s(literal 1/120 binary64))))) theta)
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (*.f64 (*.f64 theta theta) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 theta theta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (pow.f64 theta #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 theta theta) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))

rewrite228.0ms (2%)

Memory
-17.7MiB live, 175.8MiB allocated; 35ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022147
040139
1133139
21001139
08752133
Stop Event
iter limit
node limit
iter limit
Counts
8 → 175
Calls
Call 1
Inputs
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
Outputs
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (fma.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta))) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (*.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (cos.f64 delta) (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(sin.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))) (/.f64 (pow.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))))
(-.f64 (*.f64 (sin.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 0 binary64)) (*.f64 (cos.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)))
(-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))
(-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(cos.f64 (neg.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(cos.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (/.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(+.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) (cos.f64 theta)))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (fma.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.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 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))) (-.f64 (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 (fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)))))
(+.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))) (/.f64 (*.f64 (neg.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (fma.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (*.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (fma.f64 (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (*.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)) (*.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (*.f64 (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (*.f64 (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (sin.f64 phi1)))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))) (/.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))))
(-.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))
(*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (fma.f64 (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1))) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (sin.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal 4 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(-.f64 (/.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 delta (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 delta (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) delta)) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 delta phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 delta (neg.f64 phi1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 delta phi1)) #s(literal 2 binary64)))

eval57.0ms (0.5%)

Memory
4.8MiB live, 50.1MiB allocated; 4ms collecting garbage
Compiler

Compiled 16 726 to 1 786 computations (89.3% saved)

prune20.0ms (0.2%)

Memory
41.6MiB live, 41.6MiB allocated; 0ms collecting garbage
Pruning

17 alts after pruning (17 fresh and 0 done)

PrunedKeptTotal
New22417241
Fresh000
Picked101
Done000
Total22517242
Accuracy
99.9%
Counts
242 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
50.0%
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (/.f64 (-.f64 (pow.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (sin.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
90.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
94.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
97.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
85.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
82.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
81.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
89.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
79.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.8%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
Compiler

Compiled 2 014 to 1 016 computations (49.6% saved)

simplify152.0ms (1.3%)

Memory
-16.5MiB live, 123.0MiB allocated; 15ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
cost-diff18
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
cost-diff3
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
cost-diff3
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
059906
0101888
1190880
2486876
31628804
44857804
08031804
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(cos.f64 delta)
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(neg.f64 delta)
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(cos.f64 theta)
(sin.f64 phi1)
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(cos.f64 delta)
(sin.f64 phi1)
(neg.f64 (sin.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(cos.f64 delta)
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1))
(-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(sin.f64 phi1)
#s(literal 2 binary64)
(pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(cos.f64 delta)
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(sin.f64 phi1)
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (fma.f64 (*.f64 (sin.f64 phi1) delta) (neg.f64 (cos.f64 theta)) (cos.f64 phi1)) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (fma.f64 (*.f64 (sin.f64 phi1) delta) (neg.f64 (cos.f64 theta)) (cos.f64 phi1)) (cos.f64 phi1))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (fma.f64 (*.f64 (sin.f64 phi1) delta) (neg.f64 (cos.f64 theta)) (cos.f64 phi1)) (cos.f64 phi1)))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi1) delta) (neg.f64 (cos.f64 theta)) (cos.f64 phi1)) (cos.f64 phi1))
(neg.f64 delta)
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(cos.f64 theta)
(sin.f64 phi1)
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(cos.f64 delta)
(sin.f64 phi1)
(neg.f64 (sin.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(fma.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(cos.f64 delta)
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 1 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1))
(-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))
(-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(sin.f64 phi1)
#s(literal 2 binary64)
(pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 theta)) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))

localize256.0ms (2.2%)

Memory
14.0MiB live, 292.8MiB allocated; 31ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.3125
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1))
accuracy0.34994125976844204
(pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))
accuracy0.5895012858745693
(-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
accuracy4.220483688205314
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
accuracy0.14336109264898864
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
accuracy0.1640625
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.18359375
(*.f64 (sin.f64 delta) (cos.f64 phi1))
accuracy0.7463878796173032
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
accuracy0.1640625
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.18978500976844204
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
accuracy0.274101269536884
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
accuracy29.314395272198972
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))
accuracy0.142910009768442
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
accuracy0.14336109264898864
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
accuracy0.1640625
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy29.293308918528776
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy0.18359375
(*.f64 (sin.f64 delta) (cos.f64 phi1))
accuracy0.23894501953688402
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
accuracy0.2578125
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
accuracy0.5895012858745693
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
Samples
198.0ms256×0valid
Compiler

Compiled 860 to 56 computations (93.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 96.0ms
ival-mult: 26.0ms (27% of total)
ival-sin: 19.0ms (19.7% of total)
ival-cos: 14.0ms (14.5% of total)
ival-add: 9.0ms (9.3% of total)
ival-asin: 8.0ms (8.3% of total)
ival-atan2: 7.0ms (7.3% of total)
ival-sub: 5.0ms (5.2% of total)
ival-pow2: 4.0ms (4.1% of total)
ival-div: 2.0ms (2.1% of total)
ival-neg: 2.0ms (2.1% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series119.0ms (1%)

Memory
-6.6MiB live, 90.7MiB allocated; 10ms collecting garbage
Counts
26 → 169
Calls
Call 1
Inputs
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1))
Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
1
(+ 1 (* -1 (* delta (* phi1 (cos theta)))))
(+ 1 (* phi1 (+ (* -1 phi1) (* -1 (* delta (cos theta))))))
(+ 1 (* phi1 (+ (* -1 (* delta (cos theta))) (* phi1 (- (* -1 (* delta (* phi1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))) 1)))))
(* phi1 (+ (* phi1 (- (* phi1 (- (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos delta) (- (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))) (+ (* -1/2 (cos delta)) (* 1/6 (cos delta)))))) (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta))))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(* phi1 (cos theta))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(+ (cos delta) (* phi1 (- (* phi1 (+ (* -1 (cos delta)) (* phi1 (- (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))) (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))))
(* (pow (cos theta) 2) (pow (sin delta) 2))
(+ (* -1 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))))) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(* -1 (* phi1 (* (pow (cos theta) 2) (pow (sin delta) 2))))
(* phi1 (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))
(* phi1 (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* (pow phi1 2) (- (+ (* -1/3 (pow (cos delta) 2)) (+ (* -1/6 (- (pow (cos delta) 2) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* -1/120 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (pow (cos delta) 2))) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))
(* phi1 (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* (pow phi1 2) (- (+ (* -1/3 (pow (cos delta) 2)) (+ (* -1/6 (- (pow (cos delta) 2) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (+ (* -1/120 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* -1/6 (- (* -1/3 (pow (cos delta) 2)) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (+ (* 1/5040 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* 1/120 (- (pow (cos delta) 2) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* 2/45 (pow (cos delta) 2))))) (* -2/45 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (pow (cos delta) 2))) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (sin delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(pow (cos phi1) 2)
(* (cos phi1) (* (cos theta) (sin phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))
(pow (sin phi1) 2)
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(+ (* delta (- (* delta (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+ (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))))) (* -1 (pow (sin phi1) 2))) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(+ 1 (* -1 (pow (sin phi1) 2)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (+ (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))
(* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))
(* (pow delta 2) (+ (* -1/3 (* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))
(* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* 2/45 (* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))
(* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* (pow delta 2) (+ (* -1/315 (* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* 2/45 (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))
(pow (sin phi1) 3)
(+ (* (pow delta 2) (* (sin phi1) (- (* -1 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (pow (sin phi1) 3))
(+ (* (pow delta 2) (+ (* (sin phi1) (- (* -1 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* (pow delta 2) (* (sin phi1) (- (* 1/3 (pow (sin phi1) 2)) (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2)))))))) (pow (sin phi1) 3))
(+ (* (pow delta 2) (+ (* (sin phi1) (- (* -1 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* (pow delta 2) (+ (* (sin phi1) (- (* 1/3 (pow (sin phi1) 2)) (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (* (pow delta 2) (* (sin phi1) (- (* -2/45 (pow (sin phi1) 2)) (* 2/45 (* (pow (cos phi1) 2) (pow (cos theta) 2)))))))))) (pow (sin phi1) 3))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (pow (cos phi1) 2))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (pow (cos phi1) 2)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))) (pow (cos phi1) 2)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (pow (cos phi1) 2)))
(/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(* (cos phi1) (sin phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (+ (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (+ (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(* (pow (cos phi1) 2) (pow (sin delta) 2))
(+ (* -1 (* (pow theta 2) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow (cos phi1) 2) (pow (sin delta) 2)))
(+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (sin delta) 2))) (* 1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (* (pow (cos phi1) 2) (pow (sin delta) 2)))
(+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (sin delta) 2))) (* (pow theta 2) (+ (* -2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (sin delta) 2))))))) (* (pow (cos phi1) 2) (pow (sin delta) 2)))
(* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2))))
(+ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1)))))
(+ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow theta 2) (+ (* -1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))))
(+ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow theta 2) (+ (* (pow theta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1)))) (* 2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))))
Calls

15 calls:

TimeVariablePointExpression
32.0ms
theta
@inf
((+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (* (sin delta) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (cos phi1) (cos phi1)) (* (* (cos theta) (sin phi1)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2) (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)))
16.0ms
phi1
@inf
((+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (* (sin delta) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (cos phi1) (cos phi1)) (* (* (cos theta) (sin phi1)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2) (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)))
13.0ms
phi1
@-inf
((+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (* (sin delta) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (cos phi1) (cos phi1)) (* (* (cos theta) (sin phi1)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2) (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)))
8.0ms
theta
@0
((+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (* (sin delta) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (cos phi1) (cos phi1)) (* (* (cos theta) (sin phi1)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2) (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)))
8.0ms
theta
@-inf
((+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (sin theta) (sin delta)) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1))))))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)) (* (sin delta) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (cos phi1) (cos phi1)) (* (* (cos theta) (sin phi1)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (- (cos delta) (/ (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)) (- (* (cos delta) (sin phi1)) (* (cos theta) (* (sin delta) (cos phi1)))))) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2) (* (- (pow (* (cos delta) (sin phi1)) 2) (pow (* (cos theta) (* (sin delta) (cos phi1))) 2)) (sin phi1)))

simplify206.0ms (1.8%)

Memory
9.9MiB live, 157.6MiB allocated; 29ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
08117158
130776732
082136431
Stop Event
iter limit
node limit
Counts
169 → 168
Calls
Call 1
Inputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
1
(+ 1 (* -1 (* delta (* phi1 (cos theta)))))
(+ 1 (* phi1 (+ (* -1 phi1) (* -1 (* delta (cos theta))))))
(+ 1 (* phi1 (+ (* -1 (* delta (cos theta))) (* phi1 (- (* -1 (* delta (* phi1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))) 1)))))
(* phi1 (+ (* phi1 (- (* phi1 (- (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos delta) (- (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))) (+ (* -1/2 (cos delta)) (* 1/6 (cos delta)))))) (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta))))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(* phi1 (cos theta))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(+ (cos delta) (* phi1 (- (* phi1 (+ (* -1 (cos delta)) (* phi1 (- (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))) (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))))
(* (pow (cos theta) 2) (pow (sin delta) 2))
(+ (* -1 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))))) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(* -1 (* phi1 (* (pow (cos theta) 2) (pow (sin delta) 2))))
(* phi1 (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))
(* phi1 (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* (pow phi1 2) (- (+ (* -1/3 (pow (cos delta) 2)) (+ (* -1/6 (- (pow (cos delta) 2) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* -1/120 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (pow (cos delta) 2))) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))
(* phi1 (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* (pow phi1 2) (- (+ (* -1/3 (pow (cos delta) 2)) (+ (* -1/6 (- (pow (cos delta) 2) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (+ (* -1/120 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* -1/6 (- (* -1/3 (pow (cos delta) 2)) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (+ (* 1/5040 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* 1/120 (- (pow (cos delta) 2) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* 2/45 (pow (cos delta) 2))))) (* -2/45 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (pow (cos delta) 2))) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (sin delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(pow (cos phi1) 2)
(* (cos phi1) (* (cos theta) (sin phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))
(pow (sin phi1) 2)
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(+ (* delta (- (* delta (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+ (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))))) (* -1 (pow (sin phi1) 2))) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(+ 1 (* -1 (pow (sin phi1) 2)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (+ (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))
(* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))
(* (pow delta 2) (+ (* -1/3 (* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))
(* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* 2/45 (* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))
(* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* (pow delta 2) (+ (* -1/315 (* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* 2/45 (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))
(pow (sin phi1) 3)
(+ (* (pow delta 2) (* (sin phi1) (- (* -1 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (pow (sin phi1) 3))
(+ (* (pow delta 2) (+ (* (sin phi1) (- (* -1 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* (pow delta 2) (* (sin phi1) (- (* 1/3 (pow (sin phi1) 2)) (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2)))))))) (pow (sin phi1) 3))
(+ (* (pow delta 2) (+ (* (sin phi1) (- (* -1 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* (pow delta 2) (+ (* (sin phi1) (- (* 1/3 (pow (sin phi1) 2)) (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (* (pow delta 2) (* (sin phi1) (- (* -2/45 (pow (sin phi1) 2)) (* 2/45 (* (pow (cos phi1) 2) (pow (cos theta) 2)))))))))) (pow (sin phi1) 3))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (pow (cos phi1) 2))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (pow (cos phi1) 2)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))) (pow (cos phi1) 2)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (pow (cos phi1) 2)))
(/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(* (cos phi1) (sin phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (+ (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (+ (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(* (pow (cos phi1) 2) (pow (sin delta) 2))
(+ (* -1 (* (pow theta 2) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow (cos phi1) 2) (pow (sin delta) 2)))
(+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (sin delta) 2))) (* 1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (* (pow (cos phi1) 2) (pow (sin delta) 2)))
(+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (sin delta) 2))) (* (pow theta 2) (+ (* -2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (sin delta) 2))))))) (* (pow (cos phi1) 2) (pow (sin delta) 2)))
(* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2))))
(+ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1)))))
(+ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow theta 2) (+ (* -1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))))
(+ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow theta 2) (+ (* (pow theta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1)))) (* 2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))))
Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (* delta (* phi1 (cos theta)))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))
(+ 1 (* phi1 (+ (* -1 phi1) (* -1 (* delta (cos theta))))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))
(+ 1 (* phi1 (+ (* -1 (* delta (cos theta))) (* phi1 (- (* -1 (* delta (* phi1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))) 1)))))
(fma.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1)) #s(literal 1 binary64)) phi1)) phi1 #s(literal 1 binary64))
(* phi1 (+ (* phi1 (- (* phi1 (- (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (cos delta) (- (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))))) (* (cos theta) (sin delta)))) (+ (* -1/2 (cos delta)) (* 1/6 (cos delta)))))) (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta))))) (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))))) (* -1 (cos delta)))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (fma.f64 (fma.f64 (neg.f64 (/.f64 (cos.f64 delta) (cos.f64 theta))) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (*.f64 (cos.f64 theta) (sin.f64 delta))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (sin.f64 delta)) (*.f64 (cos.f64 delta) #s(literal -1/3 binary64))) phi1 (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (neg.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) (cos.f64 delta)) phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1 (cos.f64 delta))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64)) (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64) (*.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -1/90 binary64)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -1/630 binary64)))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 delta))) (*.f64 phi1 phi1) (sin.f64 delta))
(+ 1 (* -1 (pow phi1 2)))
(fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(fma.f64 (-.f64 (*.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) #s(literal 1 binary64))
(* phi1 (cos theta))
(*.f64 (cos.f64 theta) phi1)
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) (*.f64 phi1 phi1) (cos.f64 theta)) phi1)
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(literal 2/15 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 phi1 phi1) (cos.f64 theta)) phi1)
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (cos.f64 theta) #s(literal 2/15 binary64) (*.f64 (fma.f64 #s(literal -1/144 binary64) (cos.f64 theta) (*.f64 (cos.f64 theta) #s(literal -29/5040 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 phi1 phi1) (cos.f64 theta)) phi1)
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (*.f64 (neg.f64 (fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (+ (* -1 (cos delta)) (* phi1 (- (+ (* -1 (/ (pow (cos delta) 2) (* (cos theta) (sin delta)))) (* -1/2 (* (cos theta) (sin delta)))) (* -1 (/ (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 #s(literal -1 binary64) (cos.f64 theta)) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (sin.f64 delta)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)) (/.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (*.f64 (cos.f64 theta) (sin.f64 delta))))) phi1 (neg.f64 (cos.f64 delta))) phi1 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta))) phi1 (cos.f64 delta))
(* (pow (cos theta) 2) (pow (sin delta) 2))
(*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))
(+ (* -1 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(*.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))) (*.f64 phi1 phi1) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))))) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(fma.f64 (fma.f64 (neg.f64 phi1) phi1 #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (fma.f64 #s(literal -2/45 binary64) (*.f64 phi1 phi1) #s(literal 1/3 binary64))) (*.f64 phi1 phi1)) (*.f64 phi1 phi1)))
(* -1 (* phi1 (* (pow (cos theta) 2) (pow (sin delta) 2))))
(*.f64 (neg.f64 phi1) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))
(* phi1 (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (pow (cos delta) 2)) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (*.f64 phi1 phi1) (*.f64 (neg.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64))) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))) phi1)
(* phi1 (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* (pow phi1 2) (- (+ (* -1/3 (pow (cos delta) 2)) (+ (* -1/6 (- (pow (cos delta) 2) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* -1/120 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (pow (cos delta) 2))) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))
(*.f64 (fma.f64 (neg.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64))) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (*.f64 (+.f64 (fma.f64 (+.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (*.f64 (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))) #s(literal -1/6 binary64))) (*.f64 #s(literal -1/3 binary64) (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))))) (*.f64 phi1 phi1) (fma.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))) (*.f64 phi1 phi1))) phi1)
(* phi1 (+ (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* 1/6 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* (pow phi1 2) (- (+ (* -1/3 (pow (cos delta) 2)) (+ (* -1/6 (- (pow (cos delta) 2) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (+ (* -1/120 (* (pow (cos theta) 2) (pow (sin delta) 2))) (* (pow phi1 2) (- (+ (* -1/6 (- (* -1/3 (pow (cos delta) 2)) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (+ (* 1/5040 (* (pow (cos theta) 2) (pow (sin delta) 2))) (+ (* 1/120 (- (pow (cos delta) 2) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (* 2/45 (pow (cos delta) 2))))) (* -2/45 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))) (* 1/3 (* (pow (cos theta) 2) (pow (sin delta) 2))))) (pow (cos delta) 2))) (* -1 (* (pow (cos theta) 2) (pow (sin delta) 2)))))))
(*.f64 (fma.f64 (+.f64 (fma.f64 (+.f64 (fma.f64 (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))) #s(literal -1/6 binary64) (fma.f64 (-.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) #s(literal -1/6 binary64) (fma.f64 (*.f64 #s(literal 1/5040 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))) #s(literal 1/120 binary64) (*.f64 #s(literal 2/45 binary64) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -2/45 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64))))) (*.f64 #s(literal -1/3 binary64) (fma.f64 (cos.f64 delta) (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))))) (*.f64 phi1 phi1) (fma.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))) (*.f64 phi1 phi1) (*.f64 (neg.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64))) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))) phi1)
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (/.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))
(*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (* (pow (cos theta) 2) (pow (sin delta) 2)))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64))))) (sin.f64 phi1))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) delta)) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 delta delta))) (*.f64 delta delta) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (sin.f64 theta)) delta)
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 delta delta) (*.f64 #s(literal -1/6 binary64) (sin.f64 theta))) (*.f64 delta delta) (sin.f64 theta)) delta)
(+ (* delta (- (* delta (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (-.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (fma.f64 (neg.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (- (* delta (- (+ (* -1 (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1)))))))) (* -1 (pow (sin phi1) 2))) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (-.f64 (neg.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) #s(literal -1/3 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (fma.f64 (neg.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))) (neg.f64 (sin.f64 phi1)))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) delta (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 (fma.f64 (-.f64 (*.f64 (neg.f64 delta) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) delta (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) delta #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 delta delta))) (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(* delta (cos phi1))
(*.f64 (cos.f64 phi1) delta)
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (cos.f64 phi1)) delta)
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (cos.f64 phi1)) delta)
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 delta delta) (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1))) (*.f64 delta delta) (cos.f64 phi1)) delta)
(+ 1 (* -1 (pow (sin phi1) 2)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1/2 binary64)) delta)) delta (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1/2 binary64))) delta)) delta (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))
(-.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) delta)) delta #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (+ (* delta (+ (* -1 (/ (* (cos phi1) (* (cos theta) (- (* -1 (pow (sin phi1) 2)) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (+ (* -1/2 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (sin phi1))) (+ (* -1/2 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/6 (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (+ 1/2 (* -1 (pow (sin phi1) 2)))))))) (pow (sin phi1) 2))
(-.f64 (fma.f64 (fma.f64 (-.f64 (fma.f64 (neg.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) #s(literal -1/3 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (fma.f64 (neg.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))) (neg.f64 (sin.f64 phi1)))) delta (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) delta (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))) delta #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))
(*.f64 (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 delta delta))
(* (pow delta 2) (+ (* -1/3 (* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 delta delta))
(* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* 2/45 (* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))
(*.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (*.f64 delta delta) #s(literal -1/3 binary64))) (*.f64 delta delta) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 delta delta))
(* (pow delta 2) (+ (* (pow delta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2))) (* (pow delta 2) (+ (* -1/315 (* (pow delta 2) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* 2/45 (* (pow (cos phi1) 2) (pow (cos theta) 2))))))) (* (pow (cos phi1) 2) (pow (cos theta) 2))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 #s(literal -1/315 binary64) (*.f64 delta delta) #s(literal 2/45 binary64))) (*.f64 delta delta))) (*.f64 delta delta) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 delta delta))
(pow (sin phi1) 3)
(pow.f64 (sin.f64 phi1) #s(literal 3 binary64))
(+ (* (pow delta 2) (* (sin phi1) (- (* -1 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (pow (sin phi1) 3))
(fma.f64 (*.f64 (-.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1)) (*.f64 delta delta) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)))
(+ (* (pow delta 2) (+ (* (sin phi1) (- (* -1 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* (pow delta 2) (* (sin phi1) (- (* 1/3 (pow (sin phi1) 2)) (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2)))))))) (pow (sin phi1) 3))
(fma.f64 (fma.f64 (*.f64 (*.f64 delta delta) (sin.f64 phi1)) (*.f64 #s(literal 1/3 binary64) (fma.f64 (sin.f64 phi1) (sin.f64 phi1) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (*.f64 (-.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1))) (*.f64 delta delta) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)))
(+ (* (pow delta 2) (+ (* (sin phi1) (- (* -1 (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (cos theta) 2)))) (* (pow delta 2) (+ (* (sin phi1) (- (* 1/3 (pow (sin phi1) 2)) (* -1/3 (* (pow (cos phi1) 2) (pow (cos theta) 2))))) (* (pow delta 2) (* (sin phi1) (- (* -2/45 (pow (sin phi1) 2)) (* 2/45 (* (pow (cos phi1) 2) (pow (cos theta) 2)))))))))) (pow (sin phi1) 3))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 delta delta) (sin.f64 phi1)) (*.f64 #s(literal -2/45 binary64) (fma.f64 (sin.f64 phi1) (sin.f64 phi1) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (fma.f64 (sin.f64 phi1) (sin.f64 phi1) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (sin.f64 phi1))) (*.f64 delta delta) (*.f64 (-.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1))) (*.f64 delta delta) (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) delta)) delta)
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(*.f64 (neg.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (neg.f64 delta))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) theta)
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) theta)
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))) (*.f64 theta theta) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (sin.f64 delta))) (*.f64 theta theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) theta)
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta theta) (sin.f64 delta)) theta)
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))) (*.f64 theta theta) (*.f64 #s(literal -1/6 binary64) (sin.f64 delta))) (*.f64 theta theta) (sin.f64 delta)) theta)
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (pow (cos phi1) 2))
(fma.f64 (neg.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (pow (cos phi1) 2)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 theta theta)) (fma.f64 (neg.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))) (pow (cos phi1) 2)))
(fma.f64 (neg.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/24 binary64) delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 theta theta)) (*.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))) (*.f64 theta theta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (pow (cos phi1) 2)))
(fma.f64 (neg.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/24 binary64) delta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal 1/720 binary64) delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 theta theta)))) (*.f64 theta theta))) (*.f64 theta theta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))
(+ (* (pow theta 2) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))))) (*.f64 theta theta) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))))
(+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal -1/3 binary64) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 1/2 binary64))) (*.f64 theta theta) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (*.f64 theta theta) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))))
(+ (* (pow theta 2) (- (+ (* (pow theta 2) (- (+ (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 2/45 binary64) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))))) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal -1/3 binary64) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/720 binary64)))) (*.f64 theta theta) (/.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))) #s(literal -1/24 binary64)))) (*.f64 theta theta) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (*.f64 theta theta) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 delta)) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (cos.f64 delta)) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (cos.f64 delta)) (fma.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(* (cos phi1) (sin phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 delta) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(- (cos delta) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))))) (*.f64 theta theta) (cos.f64 delta)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (+ (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))) (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))) #s(literal -1/24 binary64) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))))) (*.f64 theta theta) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))))) (*.f64 theta theta) (cos.f64 delta)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (+ (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* (pow theta 2) (- (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (- (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* 1/720 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (+ (* -1/24 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (- (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* 1/2 (/ (* (cos phi1) (* (sin delta) (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (pow (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))) 2)))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (* 2/45 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))))) (* -1/3 (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))))) (/ (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))) (/ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (- (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/2 binary64) (fma.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal -1/3 binary64) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))) #s(literal 1/720 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal -1/24 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 2/45 binary64))) (*.f64 theta theta) (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64)))))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))) #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (cos.f64 phi1)) (pow.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))) #s(literal 2 binary64))) #s(literal -1/24 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal -1/3 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))) (*.f64 theta theta) (*.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1))))))) (*.f64 theta theta) (cos.f64 delta)) (/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)))))
(* (pow (cos phi1) 2) (pow (sin delta) 2))
(*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ (* -1 (* (pow theta 2) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow (cos phi1) 2) (pow (sin delta) 2)))
(*.f64 (fma.f64 (neg.f64 theta) theta #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (sin delta) 2))) (* 1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (pow (sin delta) 2)))))) (* (pow (cos phi1) 2) (pow (sin delta) 2)))
(fma.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 #s(literal 1/3 binary64) (*.f64 theta theta) #s(literal -1 binary64))) (*.f64 theta theta) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* (pow theta 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (sin delta) 2))) (* (pow theta 2) (+ (* -2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (sin delta) 2))))))) (* (pow (cos phi1) 2) (pow (sin delta) 2)))
(fma.f64 (fma.f64 (neg.f64 theta) theta #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 #s(literal -2/45 binary64) (*.f64 theta theta) #s(literal 1/3 binary64))) (*.f64 theta theta)) (*.f64 theta theta)))
(* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2))))
(*.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1))
(+ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1)))))
(fma.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 theta theta)))
(+ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow theta 2) (+ (* -1/3 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))))
(fma.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1) (*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 theta theta)))
(+ (* (sin phi1) (- (* (pow (cos delta) 2) (pow (sin phi1) 2)) (* (pow (cos phi1) 2) (pow (sin delta) 2)))) (* (pow theta 2) (+ (* (pow theta 2) (+ (* -1/3 (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1)))) (* 2/45 (* (pow theta 2) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))))) (* (pow (cos phi1) 2) (* (pow (sin delta) 2) (sin phi1))))))
(fma.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (*.f64 theta theta) #s(literal -1/3 binary64))) (*.f64 theta theta) (*.f64 (*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (*.f64 theta theta)))

rewrite203.0ms (1.7%)

Memory
11.1MiB live, 144.7MiB allocated; 11ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
059676
0101561
1434557
23232557
08879553
Stop Event
iter limit
node limit
iter limit
Counts
26 → 484
Calls
Call 1
Inputs
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1))
Outputs
(*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 6 binary64))) (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (+.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (neg.f64 (sin.f64 phi1)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (sin.f64 phi1)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 6 binary64))) (sin.f64 phi1)) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (neg.f64 (sin.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(neg.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (neg.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (cos.f64 theta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))
(-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (sin.f64 phi1)))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi1) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (neg.f64 (cos.f64 phi1))))
(*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (+.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta))))
(/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (cos.f64 phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (pow.f64 (fabs.f64 (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (cos.f64 phi1)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (neg.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (fabs.f64 (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (cos.f64 phi1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (neg.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (neg.f64 delta)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (neg.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (neg.f64 delta)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(fma.f64 delta (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(fma.f64 delta (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (cos.f64 phi1)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (cos.f64 phi1)))))
(-.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) (*.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta))) (cos.f64 phi1)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) (neg.f64 delta)))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
(-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(+.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 3 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (fma.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(*.f64 (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 6 binary64))) (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (+.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) (sin.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (neg.f64 (sin.f64 phi1)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (sin.f64 phi1)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 6 binary64))) (sin.f64 phi1)) (*.f64 (+.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (neg.f64 (sin.f64 phi1))) (neg.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(neg.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1)) (neg.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (cos.f64 theta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))
(-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (*.f64 (neg.f64 (cos.f64 delta)) (sin.f64 phi1)) (sin.f64 phi1)))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 delta (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) delta)) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 delta (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 phi1 delta)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 2 binary64)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))
(*.f64 (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (cos.f64 phi1)) #s(literal 1 binary64)))
(*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (neg.f64 (neg.f64 (cos.f64 phi1))))
(*.f64 (neg.f64 (fabs.f64 (cos.f64 phi1))) (neg.f64 (fabs.f64 (cos.f64 phi1))))
(*.f64 (fabs.f64 (fabs.f64 (cos.f64 phi1))) (fabs.f64 (fabs.f64 (cos.f64 phi1))))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (cos.f64 phi1))
(*.f64 (neg.f64 (cos.f64 phi1)) (neg.f64 (cos.f64 phi1)))
(*.f64 (fabs.f64 (cos.f64 phi1)) (fabs.f64 (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(pow.f64 (neg.f64 (cos.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (cos.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (+.f64 (neg.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (+.f64 (neg.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (PI.f64)))) (sin.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (+.f64 (PI.f64) phi1))) (sin.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) (cos.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)))) (cos.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) (cos.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (neg.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (PI.f64) phi1))) (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (PI.f64)) (+.f64 (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 phi1) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (neg.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (+.f64 (PI.f64) phi1) (+.f64 (neg.f64 phi1) (PI.f64)))) (cos.f64 (-.f64 (+.f64 (PI.f64) phi1) (+.f64 (neg.f64 phi1) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 3 binary64)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi1)) (cos.f64 (-.f64 (neg.f64 phi1) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 phi1))) (cos.f64 (-.f64 phi1 (neg.f64 phi1)))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (neg.f64 (neg.f64 (sin.f64 phi1)))))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) (PI.f64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))))
(fabs.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 (cos.f64 phi1))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (cos.f64 phi1))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64))))
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 phi1) (PI.f64))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)))) (/.f64 (sin.f64 phi1) (fma.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) #s(literal 1 binary64)) (pow.f64 (cos.f64 theta) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) #s(literal 1 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 theta)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta)) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 theta) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 delta) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (cos.f64 theta) #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (cos.f64 theta) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) (fabs.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(*.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))
(*.f64 (pow.f64 (sin.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 1 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 theta) #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 1 binary64)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(*.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta)) (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 theta)))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 2 binary64)) (pow.f64 (cos.f64 theta) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 theta) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))
(pow.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))) #s(literal 2 binary64))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64)))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 6 binary64)))) (+.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 6 binary64))) (sin.f64 phi1)) (+.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) #s(literal 4 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)) (cos.f64 delta)) #s(literal 2 binary64))))

eval124.0ms (1.1%)

Memory
-38.7MiB live, 152.8MiB allocated; 18ms collecting garbage
Compiler

Compiled 44 208 to 3 934 computations (91.1% saved)

prune49.0ms (0.4%)

Memory
29.9MiB live, 81.4MiB allocated; 5ms collecting garbage
Pruning

33 alts after pruning (31 fresh and 2 done)

PrunedKeptTotal
New69425719
Fresh6612
Picked325
Done000
Total70333736
Accuracy
99.9%
Counts
736 → 33
Alt Table
Click to see full alt table
StatusAccuracyProgram
34.3%
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)))
82.7%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1)
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
94.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (sin.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
90.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
94.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
85.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
97.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
81.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
82.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
89.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
71.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1)) #s(literal 1 binary64)) phi1)) phi1 #s(literal 1 binary64))))))
69.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
60.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
77.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
73.4%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
71.9%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
79.0%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
74.4%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
79.9%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
73.4%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
74.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
70.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
87.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
99.8%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
Compiler

Compiled 3 602 to 2 079 computations (42.3% saved)

simplify132.0ms (1.1%)

Memory
-10.0MiB live, 80.4MiB allocated; 10ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
cost-diff0
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
cost-diff2
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
cost-diff2
(-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
071936
0110936
1197912
2440900
31220900
42897891
56097891
08028881
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(cos.f64 delta)
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))
#s(literal 1 binary64)
(*.f64 (*.f64 (cos.f64 theta) phi1) delta)
(*.f64 (cos.f64 theta) phi1)
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(neg.f64 delta)
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(cos.f64 theta)
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(cos.f64 theta)
#s(approx (* (sin delta) (cos phi1)) (sin.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(cos.f64 delta)
(sin.f64 phi1)
(neg.f64 (sin.f64 phi1))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 delta) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 delta) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 delta) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 theta)) (sin.f64 phi1)) (sin.f64 delta))))
(cos.f64 delta)
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(*.f64 (fma.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))
#s(literal 1 binary64)
(*.f64 (*.f64 (cos.f64 theta) phi1) delta)
(*.f64 (cos.f64 theta) phi1)
(cos.f64 theta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))
(neg.f64 delta)
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (cos.f64 theta) (sin.f64 phi1))
(cos.f64 theta)
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(cos.f64 theta)
#s(approx (* (sin delta) (cos phi1)) (sin.f64 delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(cos.f64 delta)
(sin.f64 phi1)
(neg.f64 (sin.f64 phi1))

localize208.0ms (1.8%)

Memory
15.7MiB live, 154.1MiB allocated; 14ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.14336109264898864
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
accuracy0.1640625
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.7463878796173032
(fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
accuracy30.702461594274563
#s(approx (* (sin delta) (cos phi1)) (sin.f64 delta))
accuracy0.18359375
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
accuracy0.18978500976844204
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
accuracy29.314395272198972
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))
accuracy39.175592008837505
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
accuracy0.14336109264898864
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))))
accuracy0.1640625
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy29.314395272198972
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))
accuracy32.49933125357456
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))
accuracy0.14336109264898864
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
accuracy0.1640625
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy26.140328607839017
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
accuracy29.293308918528776
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy0.18359375
(*.f64 (cos.f64 phi1) (sin.f64 delta))
accuracy0.244472509768442
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy0.2578125
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
accuracy0.5895012858745693
(-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
Samples
130.0ms256×0valid
Compiler

Compiled 715 to 52 computations (92.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 99.0ms
ival-mult: 25.0ms (25.2% of total)
ival-add: 19.0ms (19.1% of total)
ival-sin: 19.0ms (19.1% of total)
ival-cos: 14.0ms (14.1% of total)
ival-atan2: 11.0ms (11.1% of total)
ival-asin: 3.0ms (3% of total)
ival-sub: 3.0ms (3% of total)
ival-pow2: 2.0ms (2% of total)
ival-neg: 2.0ms (2% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series53.0ms (0.5%)

Memory
10.9MiB live, 56.7MiB allocated; 4ms collecting garbage
Counts
27 → 131
Calls
Call 1
Inputs
(-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
#s(approx (* (sin delta) (cos phi1)) (sin.f64 delta))
(fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
1
(+ 1 (* -1 (* delta (* phi1 (cos theta)))))
(+ 1 (* phi1 (+ (* -1 phi1) (* -1 (* delta (cos theta))))))
(+ 1 (* phi1 (+ (* -1 (* delta (cos theta))) (* phi1 (- (* -1 (* delta (* phi1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))) 1)))))
(* phi1 (cos theta))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(* -1 (* delta (* phi1 (cos theta))))
(* phi1 (+ (* -1 (* delta (cos theta))) (* -1 (* delta (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(* phi1 (+ (* -1 (* delta (cos theta))) (* (pow phi1 2) (+ (* -1 (* delta (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))) (* -1 (* delta (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))))
(* phi1 (+ (* -1 (* delta (cos theta))) (* (pow phi1 2) (+ (* -1 (* delta (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))) (* (pow phi1 2) (+ (* -1 (* delta (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))) (* -1 (* delta (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(pow (sin phi1) 2)
(* (cos phi1) (sin delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(pow (cos phi1) 2)
(+ 1 (* -1 (pow (sin phi1) 2)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (pow (cos phi1) 2))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (pow (cos phi1) 2)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))) (pow (cos phi1) 2)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (pow (cos phi1) 2)))
(* (cos phi1) (sin phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(* -1 (* delta (* (cos phi1) (sin phi1))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
Calls

15 calls:

TimeVariablePointExpression
12.0ms
phi1
@-inf
((- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (pow (sin phi1) 2) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (* (cos theta) (sin phi1)) (cos phi1)) (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (sin delta) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))
5.0ms
phi1
@inf
((- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (pow (sin phi1) 2) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (* (cos theta) (sin phi1)) (cos phi1)) (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (sin delta) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))
5.0ms
delta
@inf
((- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (pow (sin phi1) 2) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (* (cos theta) (sin phi1)) (cos phi1)) (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (sin delta) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))
4.0ms
theta
@-inf
((- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (pow (sin phi1) 2) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (* (cos theta) (sin phi1)) (cos phi1)) (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (sin delta) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))
4.0ms
theta
@inf
((- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (pow (sin phi1) 2) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (* (* (cos theta) (sin phi1)) (cos phi1)) (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (sin delta) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))

simplify189.0ms (1.6%)

Memory
-10.2MiB live, 134.5MiB allocated; 31ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05443290
121792893
274342840
083772646
Stop Event
iter limit
node limit
Counts
131 → 130
Calls
Call 1
Inputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
1
(+ 1 (* -1 (* delta (* phi1 (cos theta)))))
(+ 1 (* phi1 (+ (* -1 phi1) (* -1 (* delta (cos theta))))))
(+ 1 (* phi1 (+ (* -1 (* delta (cos theta))) (* phi1 (- (* -1 (* delta (* phi1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))) 1)))))
(* phi1 (cos theta))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(* -1 (* delta (* phi1 (cos theta))))
(* phi1 (+ (* -1 (* delta (cos theta))) (* -1 (* delta (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(* phi1 (+ (* -1 (* delta (cos theta))) (* (pow phi1 2) (+ (* -1 (* delta (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))) (* -1 (* delta (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))))
(* phi1 (+ (* -1 (* delta (cos theta))) (* (pow phi1 2) (+ (* -1 (* delta (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))) (* (pow phi1 2) (+ (* -1 (* delta (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))) (* -1 (* delta (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(pow (sin phi1) 2)
(* (cos phi1) (sin delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(* (cos phi1) (* (cos theta) (sin phi1)))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(pow (cos phi1) 2)
(+ 1 (* -1 (pow (sin phi1) 2)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (pow (cos phi1) 2))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (pow (cos phi1) 2)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))) (pow (cos phi1) 2)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (pow (cos phi1) 2)))
(* (cos phi1) (sin phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(* -1 (* delta (* (cos phi1) (sin phi1))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) (cos.f64 delta)) phi1)) phi1 (cos.f64 delta))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (pow.f64 phi1 #s(literal 4 binary64))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64))) (pow.f64 phi1 #s(literal 3 binary64)) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta)))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64) (*.f64 (fma.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -1/90 binary64)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -1/630 binary64)))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(fma.f64 #s(literal -1/3 binary64) (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 phi1 phi1)) #s(literal 1/3 binary64)) (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 phi1 phi1) #s(literal 2/45 binary64)) (*.f64 phi1 phi1)) #s(literal 1/3 binary64)) (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 phi1 phi1))
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (pow.f64 phi1 #s(literal 4 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (* delta (* phi1 (cos theta)))))
(fma.f64 (neg.f64 delta) (*.f64 (cos.f64 theta) phi1) #s(literal 1 binary64))
(+ 1 (* phi1 (+ (* -1 phi1) (* -1 (* delta (cos theta))))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))
(+ 1 (* phi1 (+ (* -1 (* delta (cos theta))) (* phi1 (- (* -1 (* delta (* phi1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))) 1)))))
(fma.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1)) #s(literal 1 binary64)) phi1)) phi1 #s(literal 1 binary64))
(* phi1 (cos theta))
(*.f64 (cos.f64 theta) phi1)
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))
(*.f64 (fma.f64 phi1 (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1) (cos.f64 theta)) phi1)
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 theta) #s(literal 2/15 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (pow.f64 phi1 #s(literal 3 binary64)) (*.f64 (cos.f64 theta) phi1))
(* phi1 (+ (cos theta) (* (pow phi1 2) (+ (* -1/2 (cos theta)) (+ (* -1/6 (cos theta)) (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (+ (* 1/12 (cos theta)) (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (cos.f64 theta) #s(literal 2/15 binary64) (*.f64 (fma.f64 #s(literal -1/144 binary64) (cos.f64 theta) (*.f64 (cos.f64 theta) #s(literal -29/5040 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (pow.f64 phi1 #s(literal 3 binary64)) (*.f64 (cos.f64 theta) phi1))
(* -1 (* delta (* phi1 (cos theta))))
(*.f64 (*.f64 delta phi1) (neg.f64 (cos.f64 theta)))
(* phi1 (+ (* -1 (* delta (cos theta))) (* -1 (* delta (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(*.f64 (*.f64 (neg.f64 delta) (fma.f64 phi1 (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1) (cos.f64 theta))) phi1)
(* phi1 (+ (* -1 (* delta (cos theta))) (* (pow phi1 2) (+ (* -1 (* delta (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))) (* -1 (* delta (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))))
(*.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (*.f64 (neg.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) #s(literal 2/15 binary64)) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))) (*.f64 phi1 phi1))) phi1)
(* phi1 (+ (* -1 (* delta (cos theta))) (* (pow phi1 2) (+ (* -1 (* delta (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))) (* (pow phi1 2) (+ (* -1 (* delta (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta)))))))) (* -1 (* delta (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta))))))))))))
(*.f64 (fma.f64 (neg.f64 delta) (fma.f64 phi1 (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1) (cos.f64 theta)) (*.f64 (*.f64 (neg.f64 delta) (fma.f64 (cos.f64 theta) #s(literal 2/15 binary64) (*.f64 (fma.f64 #s(literal -1/144 binary64) (cos.f64 theta) (*.f64 (cos.f64 theta) #s(literal -29/5040 binary64))) (*.f64 phi1 phi1)))) (pow.f64 phi1 #s(literal 4 binary64)))) phi1)
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 delta)) (cos.f64 theta) (*.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) #s(literal -2/3 binary64))) phi1 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (sin.f64 phi1))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (cos phi1) 2))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(* (cos phi1) (* (cos theta) (sin phi1)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(- 1 (pow (sin phi1) 2))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (-.f64 (*.f64 (neg.f64 delta) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1/2 binary64))) delta)) delta (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) delta)
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta)))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (pow.f64 delta #s(literal 4 binary64)))) delta)
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta) (*.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (pow.f64 delta #s(literal 4 binary64)))) delta)
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (pow.f64 delta #s(literal 4 binary64)))) delta)
(* delta (cos phi1))
(*.f64 (cos.f64 phi1) delta)
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (cos.f64 phi1)) delta)
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) delta))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (pow.f64 delta #s(literal 4 binary64)))) delta)
(pow (cos phi1) 2)
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(+ 1 (* -1 (pow (sin phi1) 2)))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1/2 binary64)) delta)) delta (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 1/2 binary64))) delta)) delta (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (/ (pow (cos phi1) 2) delta)))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) delta)) delta)
(* -1 (* delta (+ (* -1 (/ (pow (cos phi1) 2) delta)) (* (cos phi1) (* (cos theta) (sin phi1))))))
(*.f64 (neg.f64 delta) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (neg.f64 delta))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (pow.f64 theta #s(literal 4 binary64))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta)))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (pow.f64 theta #s(literal 4 binary64)))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) theta)
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (pow.f64 theta #s(literal 3 binary64)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))) (pow.f64 theta #s(literal 4 binary64)))) theta)
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (pow.f64 theta #s(literal 3 binary64)) (*.f64 (sin.f64 delta) theta))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))) (pow.f64 theta #s(literal 4 binary64)))) theta)
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (pow.f64 theta #s(literal 4 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (cos.f64 delta)))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+.f64 (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (pow.f64 theta #s(literal 4 binary64))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (pow (cos phi1) 2))
(fma.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (pow (cos phi1) 2)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 theta theta)) (fma.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))) (pow (cos phi1) 2)))
(fma.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/24 binary64) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 theta theta)) (*.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (*.f64 theta theta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (+ (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))) (pow (cos phi1) 2)))
(fma.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/720 binary64) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 theta theta)) (*.f64 (*.f64 #s(literal -1/24 binary64) delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (*.f64 theta theta))) (*.f64 theta theta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(* (cos phi1) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* (cos phi1) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(+ (* (cos phi1) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/24 (* (cos phi1) (sin phi1))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (pow.f64 theta #s(literal 4 binary64))))
(* -1 (* delta (* (cos phi1) (sin phi1))))
(*.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* 1/2 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) delta)) (sin.f64 phi1) (*.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 theta theta))))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))) (* 1/2 (* delta (* (cos phi1) (sin phi1)))))))
(fma.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/24 binary64) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 theta theta)) (*.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (*.f64 theta theta)))
(+ (* -1 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* delta (* (cos phi1) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* delta (* (cos phi1) (sin phi1)))) (* 1/720 (* delta (* (pow theta 2) (* (cos phi1) (sin phi1))))))))))
(fma.f64 (neg.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/720 binary64) delta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 theta theta)) (*.f64 (*.f64 #s(literal -1/24 binary64) delta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))) (*.f64 theta theta))) (*.f64 theta theta)))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (cos.f64 delta)))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+.f64 (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (pow.f64 theta #s(literal 4 binary64))))

rewrite136.0ms (1.2%)

Memory
19.4MiB live, 109.9MiB allocated; 10ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
071766
0110740
1394720
03055699
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
27 → 208
Calls
Call 1
Inputs
(-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
#s(approx (* (sin delta) (cos phi1)) (sin.f64 delta))
(fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
Outputs
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1)))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64))) (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)))
(fma.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (asin.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))))
(-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (neg.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)))
(-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 delta)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (-.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (pow.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)))
(+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (sin.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (*.f64 (cos.f64 theta) (sin.f64 phi1))) #s(literal 2 binary64))
(*.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)))
(*.f64 (exp.f64 (log.f64 (sin.f64 phi1))) (exp.f64 (log.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (exp.f64 (log.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64))))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 2 binary64)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))
#s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
(*.f64 (*.f64 (neg.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (*.f64 (neg.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (neg.f64 delta))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (neg.f64 delta)))
(*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))
(*.f64 (cos.f64 theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (neg.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta)))
(*.f64 delta (neg.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))))
(neg.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
#s(approx (* (sin delta) (cos phi1)) (sin.f64 delta))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta)))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(-.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (neg.f64 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))))) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))))

eval107.0ms (0.9%)

Memory
-19.6MiB live, 128.5MiB allocated; 17ms collecting garbage
Compiler

Compiled 26 155 to 1 975 computations (92.4% saved)

prune73.0ms (0.6%)

Memory
-21.8MiB live, 77.2MiB allocated; 5ms collecting garbage
Pruning

37 alts after pruning (34 fresh and 3 done)

PrunedKeptTotal
New40816424
Fresh81826
Picked325
Done112
Total42037457
Accuracy
100.0%
Counts
457 → 37
Alt Table
Click to see full alt table
StatusAccuracyProgram
34.3%
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)))
82.7%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1)
94.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
99.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (sin.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
90.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
85.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
94.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
97.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)))))
81.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
82.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
89.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
69.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))))))
60.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) #s(approx (* (* (cos theta) (sin phi1)) (cos phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))))
77.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
79.0%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
72.3%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
79.9%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
58.5%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
73.4%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
67.5%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
72.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
74.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
70.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
87.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
72.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
70.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
74.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
74.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
72.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
99.8%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) lambda1 lambda1))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
Compiler

Compiled 4 107 to 2 367 computations (42.4% saved)

simplify139.0ms (1.2%)

Memory
39.8MiB live, 83.5MiB allocated; 5ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
cost-diff2
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)
cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
cost-diff0
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
cost-diff0
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))))
cost-diff0
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
cost-diff0
#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
cost-diff0
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)))
cost-diff0
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
cost-diff1
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
cost-diff2
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
080902
0133880
1248880
2551880
31610874
45318869
08150859
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(cos.f64 delta)
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
(*.f64 (sin.f64 delta) theta)
(sin.f64 delta)
delta
theta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 phi1 phi1)
phi1
#s(literal 1 binary64)
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(cos.f64 delta)
#s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
lambda1
(atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1))
#s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(*.f64 delta delta)
delta
#s(literal 1 binary64)
(sin.f64 theta)
theta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(sin.f64 delta)
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(cos.f64 delta)
(sin.f64 phi1)
(neg.f64 (sin.f64 phi1))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (sin.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (neg.f64 (sin.f64 phi1))))
(cos.f64 delta)
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) phi1))
(cos.f64 (*.f64 #s(literal -2 binary64) phi1))
(*.f64 #s(literal 2 binary64) phi1)
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos.f64 theta)
(sin.f64 phi1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
(*.f64 (sin.f64 delta) theta)
(sin.f64 delta)
delta
theta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 phi1 phi1)
phi1
#s(literal 1 binary64)
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
(cos.f64 delta)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
lambda1
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin.f64 theta)
theta
(sin.f64 delta)
delta
(cos.f64 phi1)
phi1
(-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(cos.f64 delta)
#s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin.f64 phi1)
#s(literal 2 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (pow.f64 delta #s(literal 3 binary64)) #s(literal -1/6 binary64) delta) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1)
lambda1
(atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (pow.f64 delta #s(literal 3 binary64)) #s(literal -1/6 binary64) delta) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta)))
(*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1))
(*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (pow.f64 delta #s(literal 3 binary64)) #s(literal -1/6 binary64) delta) (sin.f64 theta))) (cos.f64 phi1))
#s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))
#s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (pow.f64 delta #s(literal 3 binary64)) #s(literal -1/6 binary64) delta) (sin.f64 theta)))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)
(*.f64 (fma.f64 (pow.f64 delta #s(literal 3 binary64)) #s(literal -1/6 binary64) delta) (sin.f64 theta))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))
(*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 theta))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(*.f64 delta delta)
delta
#s(literal 1 binary64)
(sin.f64 theta)
theta
(cos.f64 phi1)
phi1
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))
(fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 delta)))
(cos.f64 theta)
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(sin.f64 delta)
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 delta))
(cos.f64 delta)
(sin.f64 phi1)
(neg.f64 (sin.f64 phi1))

localize406.0ms (3.5%)

Memory
-27.8MiB live, 305.0MiB allocated; 88ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.2815388008097556
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
accuracy0.7463878796173032
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
accuracy2.618892366035166
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))
accuracy29.970218605041993
#s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))
accuracy0.1640625
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy0.244472509768442
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
accuracy0.5895012858745693
(-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
accuracy32.899122433522805
#s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
accuracy0.1640625
(*.f64 (sin.f64 theta) (sin.f64 delta))
accuracy10.01286407574533
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
accuracy29.293308918528776
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy33.08279110985407
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))))
accuracy0.14336109264898864
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
accuracy26.140328607839017
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)))
accuracy28.133514200406005
#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
accuracy29.293308918528776
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
accuracy0.18359375
(*.f64 (cos.f64 phi1) (sin.f64 delta))
accuracy0.2578125
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
accuracy0.5895012858745693
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
accuracy13.885035328702095
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
Samples
240.0ms116×1valid
84.0ms140×0valid
Compiler

Compiled 757 to 66 computations (91.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 279.0ms
ival-sin: 65.0ms (23.3% of total)
ival-cos: 63.0ms (22.6% of total)
ival-mult: 48.0ms (17.2% of total)
adjust: 43.0ms (15.4% of total)
ival-add: 16.0ms (5.7% of total)
ival-atan2: 15.0ms (5.4% of total)
ival-sub: 11.0ms (3.9% of total)
ival-asin: 6.0ms (2.1% of total)
const: 5.0ms (1.8% of total)
ival-pow2: 4.0ms (1.4% of total)
ival-neg: 1.0ms (0.4% of total)
exact: 1.0ms (0.4% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series95.0ms (0.8%)

Memory
23.3MiB live, 68.8MiB allocated; 5ms collecting garbage
Counts
30 → 147
Calls
Call 1
Inputs
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (sin delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(pow (sin phi1) 2)
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* delta (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(sin theta)
(+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))
(+ 1 (* -1 (pow (sin phi1) 2)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
1
(+ 1 (* -1/6 (pow delta 2)))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* -1/6 (* (pow delta 3) (sin theta)))
(* (pow delta 3) (+ (* -1/6 (sin theta)) (/ (sin theta) (pow delta 2))))
(* -1/6 (* (pow delta 2) (sin theta)))
(* (pow delta 2) (+ (* -1/6 (sin theta)) (/ (sin theta) (pow delta 2))))
(* -1/6 (pow delta 2))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(* -1 (* (pow delta 3) (+ (* -1 (/ (sin theta) (pow delta 2))) (* 1/6 (sin theta)))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* theta (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))
(* theta (+ (* -1/6 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(* delta (* theta (+ 1 (* -1/6 (pow delta 2)))))
(* theta (+ (* -1/6 (* delta (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2)))))) (* delta (+ 1 (* -1/6 (pow delta 2))))))
(* theta (+ (* delta (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* delta (+ 1 (* -1/6 (pow delta 2))))) (* 1/120 (* delta (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))))))))
(* theta (+ (* delta (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* delta (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/5040 (* delta (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/120 (* delta (+ 1 (* -1/6 (pow delta 2)))))))))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(* theta (+ 1 (* -1/6 (pow delta 2))))
(* theta (+ 1 (+ (* -1/6 (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))) (* -1/6 (pow delta 2)))))
(* theta (+ 1 (+ (* -1/6 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (+ 1 (* -1/6 (pow delta 2)))) (* 1/120 (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))))))))
(* theta (+ 1 (+ (* -1/6 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))) (* 1/120 (+ 1 (* -1/6 (pow delta 2)))))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (sin theta) (+ 1 (* -1/6 (pow delta 2))))
Calls

15 calls:

TimeVariablePointExpression
47.0ms
delta
@inf
((- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (- 1/2 (* (cos (* 2 phi1)) 1/2)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (sin theta) (sin delta)) (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (+ (* -1/6 (* delta delta)) 1))
6.0ms
delta
@-inf
((- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (- 1/2 (* (cos (* 2 phi1)) 1/2)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (sin theta) (sin delta)) (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (+ (* -1/6 (* delta delta)) 1))
6.0ms
theta
@inf
((- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (- 1/2 (* (cos (* 2 phi1)) 1/2)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (sin theta) (sin delta)) (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (+ (* -1/6 (* delta delta)) 1))
6.0ms
theta
@-inf
((- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (- 1/2 (* (cos (* 2 phi1)) 1/2)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (sin theta) (sin delta)) (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (+ (* -1/6 (* delta delta)) 1))
5.0ms
phi1
@inf
((- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (- 1/2 (* (cos (* 2 phi1)) 1/2)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (sin theta) (sin delta)) (* (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) delta) (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)))) (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta))) (* (* (sin theta) (sin delta)) (cos phi1)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)) (* (cos phi1) (sin delta)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow (sin phi1) 2) (* (sin theta) (sin delta)) (* (+ (* -1/6 (* delta delta)) 1) (sin theta)) (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (+ (* -1/6 (* delta delta)) 1))

simplify205.0ms (1.8%)

Memory
-0.3MiB live, 138.5MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05673796
122783442
267363441
083463185
Stop Event
iter limit
node limit
Counts
147 → 146
Calls
Call 1
Inputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(* (cos phi1) (sin delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(pow (sin phi1) 2)
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* delta (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(sin theta)
(+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))
(+ 1 (* -1 (pow (sin phi1) 2)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
1
(+ 1 (* -1/6 (pow delta 2)))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* -1/6 (* (pow delta 3) (sin theta)))
(* (pow delta 3) (+ (* -1/6 (sin theta)) (/ (sin theta) (pow delta 2))))
(* -1/6 (* (pow delta 2) (sin theta)))
(* (pow delta 2) (+ (* -1/6 (sin theta)) (/ (sin theta) (pow delta 2))))
(* -1/6 (pow delta 2))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(* -1 (* (pow delta 3) (+ (* -1 (/ (sin theta) (pow delta 2))) (* 1/6 (sin theta)))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* theta (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))
(* theta (+ (* -1/6 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(* delta (* theta (+ 1 (* -1/6 (pow delta 2)))))
(* theta (+ (* -1/6 (* delta (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2)))))) (* delta (+ 1 (* -1/6 (pow delta 2))))))
(* theta (+ (* delta (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* delta (+ 1 (* -1/6 (pow delta 2))))) (* 1/120 (* delta (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))))))))
(* theta (+ (* delta (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* delta (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/5040 (* delta (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/120 (* delta (+ 1 (* -1/6 (pow delta 2)))))))))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(* theta (+ 1 (* -1/6 (pow delta 2))))
(* theta (+ 1 (+ (* -1/6 (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))) (* -1/6 (pow delta 2)))))
(* theta (+ 1 (+ (* -1/6 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (+ 1 (* -1/6 (pow delta 2)))) (* 1/120 (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))))))))
(* theta (+ 1 (+ (* -1/6 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))) (* 1/120 (+ 1 (* -1/6 (pow delta 2)))))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(* (sin theta) (+ 1 (* -1/6 (pow delta 2))))
Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)) 1)))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) (neg.f64 lambda1)) #s(literal 1 binary64)))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.f64 delta))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta) (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/3 binary64)) phi1) (cos.f64 delta)) phi1)) phi1 (cos.f64 delta))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 phi1 phi1))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (fma.f64 (-.f64 (*.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 phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 phi1 phi1) #s(literal 2/45 binary64)) (*.f64 phi1 phi1)) #s(literal 1/3 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 phi1 phi1))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))
(*.f64 (fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -2/3 binary64)) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (* 1/12 (* (cos theta) (sin delta)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64)) (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -2/3 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/6 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* 1/120 (* (cos theta) (sin delta))) (+ (* 1/24 (* (cos theta) (sin delta))) (+ (* 1/12 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/144 (* (cos theta) (sin delta))) (+ (* -1/240 (* (cos theta) (sin delta))) (+ (* -1/720 (* (cos theta) (sin delta))) (* -1/5040 (* (cos theta) (sin delta))))))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/144 binary64) (cos.f64 theta)) (sin.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -29/5040 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -2/3 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 delta))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 delta))) (*.f64 phi1 phi1) (sin.f64 delta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1)) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -2/3 binary64)) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -2/3 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.f64 delta)) phi1 (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1)
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) (sin.f64 delta) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.f64 delta))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 theta)) (sin.f64 delta) (*.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal -2/3 binary64)) phi1 (cos.f64 delta))) phi1)) phi1 (cos.f64 delta))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta))))
(*.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(*.f64 (fma.f64 (/.f64 (sin.f64 delta) phi1) (/.f64 (sin.f64 theta) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 delta)) (sin.f64 theta))) (*.f64 phi1 phi1))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1)))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(fma.f64 (fma.f64 (neg.f64 delta) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1))) delta (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))))
(fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) delta (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1))) delta (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 theta))) delta)
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) delta)
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (sin.f64 theta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 delta delta))) (*.f64 delta delta) (*.f64 (cos.f64 phi1) (sin.f64 theta))) delta)
(* delta (sin theta))
(*.f64 (sin.f64 theta) delta)
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (sin.f64 theta)) delta)
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 delta delta) (*.f64 #s(literal -1/6 binary64) (sin.f64 theta))) (*.f64 delta delta) (sin.f64 theta)) delta)
(* delta (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))
(*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta)
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta)
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 delta delta) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 theta)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 delta delta) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta)
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* 1/120 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 delta delta))) (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta)
(* delta (cos phi1))
(*.f64 (cos.f64 phi1) delta)
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (cos.f64 phi1)) delta)
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (cos.f64 phi1)) delta)
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 delta delta) #s(literal 1/120 binary64))) (*.f64 delta delta) (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1))) (*.f64 delta delta) (cos.f64 phi1)) delta)
(- 1 (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (-.f64 (*.f64 (neg.f64 delta) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) delta)) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(+ (* delta (* (cos phi1) (* (cos theta) (sin phi1)))) (pow (sin phi1) 2))
(fma.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) delta)) delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(sin theta)
(sin.f64 theta)
(+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta))))
(*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 theta))
(+ 1 (* -1 (pow (sin phi1) 2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) delta)) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(fma.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (-.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) delta)) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1)))
1
#s(literal 1 binary64)
(+ 1 (* -1/6 (pow delta 2)))
(fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta)) (sin.f64 delta))
(* -1/6 (* (pow delta 3) (sin theta)))
(*.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 delta #s(literal 3 binary64))) (sin.f64 theta))
(* (pow delta 3) (+ (* -1/6 (sin theta)) (/ (sin theta) (pow delta 2))))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (/.f64 (/.f64 (sin.f64 theta) delta) delta)) (pow.f64 delta #s(literal 3 binary64)))
(* -1/6 (* (pow delta 2) (sin theta)))
(*.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) (sin.f64 theta))
(* (pow delta 2) (+ (* -1/6 (sin theta)) (/ (sin theta) (pow delta 2))))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (sin.f64 theta) (/.f64 (/.f64 (sin.f64 theta) delta) delta)) (*.f64 delta delta))
(* -1/6 (pow delta 2))
(*.f64 (*.f64 delta delta) #s(literal -1/6 binary64))
(* (pow delta 2) (- (/ 1 (pow delta 2)) 1/6))
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 delta delta)) #s(literal 1/6 binary64)) (*.f64 delta delta))
(* -1 (* (pow delta 3) (+ (* -1 (/ (sin theta) (pow delta 2))) (* 1/6 (sin theta)))))
(*.f64 (pow.f64 (neg.f64 delta) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (sin.f64 theta) (/.f64 (sin.f64 theta) (*.f64 (neg.f64 delta) delta))))
(- (cos delta) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (cos.f64 delta)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (cos.f64 delta)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) theta)
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) theta)
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))) (*.f64 theta theta) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (sin.f64 delta))) (*.f64 theta theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) theta)
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta theta) (sin.f64 delta)) theta)
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 delta) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))) (*.f64 theta theta) (*.f64 #s(literal -1/6 binary64) (sin.f64 delta))) (*.f64 theta theta) (sin.f64 delta)) theta)
(* theta (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 delta))) theta)
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 delta)) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta theta) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 delta))) theta)
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 delta)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))) (*.f64 theta theta) (*.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 delta)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 theta theta) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 delta))) theta)
(* delta (* theta (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) theta) delta)
(* theta (+ (* -1/6 (* delta (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2)))))) (* delta (+ 1 (* -1/6 (pow delta 2))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) (*.f64 (*.f64 theta theta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) delta)) theta)
(* theta (+ (* delta (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* delta (+ 1 (* -1/6 (pow delta 2))))) (* 1/120 (* delta (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) delta) (*.f64 (*.f64 theta theta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) delta) #s(literal -1/6 binary64))) (*.f64 theta theta) (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) delta)) theta)
(* theta (+ (* delta (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/6 (* delta (+ 1 (* -1/6 (pow delta 2))))) (* (pow theta 2) (+ (* -1/5040 (* delta (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2)))))) (* 1/120 (* delta (+ 1 (* -1/6 (pow delta 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) delta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/5040 binary64) delta) (*.f64 (*.f64 theta theta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))))) (*.f64 theta theta))) (*.f64 theta theta) (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) delta)) theta)
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))
(+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1))))
(fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 theta theta) #s(literal -1/2 binary64))) (*.f64 theta theta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(+ (* (cos delta) (pow (sin phi1) 2)) (+ (* (cos phi1) (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 theta theta) #s(literal 1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(- (cos delta) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (+ (* (cos delta) (pow (sin phi1) 2)) (* (cos phi1) (* (sin delta) (sin phi1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)))))
(* theta (+ 1 (* -1/6 (pow delta 2))))
(*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) theta)
(* theta (+ 1 (+ (* -1/6 (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))) (* -1/6 (pow delta 2)))))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (fma.f64 (*.f64 theta theta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 delta delta)) #s(literal 1 binary64)) theta)
(* theta (+ 1 (+ (* -1/6 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (+ 1 (* -1/6 (pow delta 2)))) (* 1/120 (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))))))))
(*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 theta theta) #s(literal -1/6 binary64))) (*.f64 theta theta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) theta)
(* theta (+ 1 (+ (* -1/6 (pow delta 2)) (* (pow theta 2) (+ (* -1/6 (+ 1 (* -1/6 (pow delta 2)))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (+ 1 (* -1/6 (pow delta 2))))) (* 1/120 (+ 1 (* -1/6 (pow delta 2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 theta theta) #s(literal 1/120 binary64))) (*.f64 theta theta) (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) #s(literal -1/6 binary64))) (*.f64 theta theta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) theta)
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1)))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal -1/24 binary64) (*.f64 theta theta) #s(literal 1/2 binary64))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 #s(literal 1/720 binary64) (*.f64 theta theta) #s(literal -1/24 binary64))) (*.f64 theta theta))) (*.f64 theta theta) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (sin.f64 phi1))))
(* delta (* (sin theta) (+ 1 (* -1/6 (pow delta 2)))))
(*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(* (sin theta) (+ 1 (* -1/6 (pow delta 2))))
(*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 theta))

rewrite119.0ms (1%)

Memory
11.8MiB live, 102.1MiB allocated; 10ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
080704
0133683
1488651
03525651
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
30 → 289
Calls
Call 1
Inputs
(-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)))
#s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta)))
(*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
#s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta))
(fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
Outputs
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (neg.f64 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(*.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)))
(*.f64 (exp.f64 (log.f64 (sin.f64 phi1))) (exp.f64 (log.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (exp.f64 (log.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal -2 binary64) phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(fma.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta))))
#s(approx (* (sin theta) (sin delta)) (*.f64 theta (sin.f64 delta)))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) (-.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))
#s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 delta)) (sin.f64 theta))
(*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 (sin.f64 delta) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 (pow.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (fma.f64 (pow.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal -1 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64)) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) (*.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (-.f64 (pow.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (fma.f64 (pow.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(fma.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(fma.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))) (*.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(+.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 theta) (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))
(*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 theta)) delta)
(*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) delta))
(*.f64 (sin.f64 theta) (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) delta))
(*.f64 delta (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 theta)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) delta)) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 delta delta) #s(literal 3 binary64)) #s(literal -1/216 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) delta)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) #s(literal 3 binary64)) (fma.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) (-.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1) (*.f64 lambda1 lambda1))))
(+.f64 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))
(atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta)))
(*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta))))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (sin.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 delta (neg.f64 phi1))) (sin.f64 (+.f64 delta (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 delta (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) delta))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi1 delta)) (sin.f64 (-.f64 delta phi1))) #s(literal 2 binary64))
(+.f64 (/.f64 (sin.f64 (-.f64 delta phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi1 delta)) #s(literal 2 binary64)))
#s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))
#s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (+.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta))) (/.f64 (pow.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (+.f64 #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(*.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 phi1)) (fabs.f64 (sin.f64 phi1)))
(*.f64 (exp.f64 (log.f64 (sin.f64 phi1))) (exp.f64 (log.f64 (sin.f64 phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (neg.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(pow.f64 (exp.f64 (log.f64 (sin.f64 phi1))) #s(literal 2 binary64))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (neg.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal -2 binary64) phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(fma.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64))))
(+.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (fma.f64 #s(literal -2 binary64) phi1 (PI.f64))) #s(literal 1/2 binary64)))
#s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 delta (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))) (sin.f64 theta)))
(*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 theta))
(*.f64 (sin.f64 theta) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (sin.f64 theta)) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 delta delta) #s(literal 3 binary64)) #s(literal -1/216 binary64) #s(literal 1 binary64)) (sin.f64 theta)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64))))
(/.f64 (*.f64 (sin.f64 theta) (-.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(/.f64 (*.f64 (sin.f64 theta) (fma.f64 (pow.f64 (*.f64 delta delta) #s(literal 3 binary64)) #s(literal -1/216 binary64) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64))))
(fma.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) (sin.f64 theta) (*.f64 #s(literal 1 binary64) (sin.f64 theta)))
(fma.f64 #s(literal 1 binary64) (sin.f64 theta) (*.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) (sin.f64 theta)))
(fma.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) (*.f64 (sin.f64 theta) #s(literal 1 binary64)))
(fma.f64 (sin.f64 theta) #s(literal 1 binary64) (*.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 #s(literal 1 binary64) (sin.f64 theta)))
(+.f64 (*.f64 #s(literal 1 binary64) (sin.f64 theta)) (*.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) (sin.f64 theta)))
(+.f64 (*.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 (sin.f64 theta) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 theta) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 2 binary64))) (+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 3 binary64))) (fma.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64))) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta)))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (cos.f64 delta) (-.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64))) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (cos.f64 delta))
(fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (sin.f64 phi1) (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))) (/.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(-.f64 (cos.f64 delta) (*.f64 (neg.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (neg.f64 (sin.f64 phi1))))
(-.f64 (cos.f64 delta) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (cos.f64 delta) (fma.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))) (sin.f64 phi1)) #s(literal 2 binary64)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (neg.f64 (cos.f64 theta)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1)))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (neg.f64 (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (neg.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))) (cos.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 delta delta) #s(literal 3 binary64)) #s(literal -1/216 binary64) #s(literal 1 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(/.f64 (fma.f64 (pow.f64 (*.f64 delta delta) #s(literal 3 binary64)) #s(literal -1/216 binary64) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 delta delta) #s(literal 3 binary64)) #s(literal -1/216 binary64) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64))))
(fma.f64 (*.f64 #s(literal -1/6 binary64) (fabs.f64 delta)) (fabs.f64 delta) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/6 binary64) (neg.f64 delta)) (neg.f64 delta) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/6 binary64) delta) (*.f64 delta #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64))
(fma.f64 (fabs.f64 delta) (*.f64 (fabs.f64 delta) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 delta) (*.f64 (neg.f64 delta) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(fma.f64 delta (*.f64 #s(literal -1/6 binary64) delta) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal -1 binary64))))
(-.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 #s(literal -1/6 binary64) delta)) delta))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 delta delta)) #s(literal -1/6 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 delta delta)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)))))
(+.f64 (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) #s(literal -1/6 binary64)))

eval110.0ms (0.9%)

Memory
-4.1MiB live, 92.4MiB allocated; 14ms collecting garbage
Compiler

Compiled 25 114 to 2 262 computations (91% saved)

prune58.0ms (0.5%)

Memory
8.3MiB live, 101.5MiB allocated; 4ms collecting garbage
Pruning

38 alts after pruning (33 fresh and 5 done)

PrunedKeptTotal
New40110411
Fresh62329
Picked325
Done033
Total41038448
Accuracy
100.0%
Counts
448 → 38
Alt Table
Click to see full alt table
StatusAccuracyProgram
82.7%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1)
94.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (sin.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
90.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
85.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
94.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
97.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)))))
82.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
81.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
89.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
69.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))))))
60.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) #s(approx (* (* (cos theta) (sin phi1)) (cos phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))))
77.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
72.3%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
79.0%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
77.7%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
51.7%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 #s(approx (+ (* -1/6 (* delta delta)) 1) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 delta delta)) #s(literal 1/6 binary64)) (*.f64 delta delta))) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
79.9%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
58.5%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
73.4%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
67.5%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
72.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
66.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (-.f64 (*.f64 (neg.f64 delta) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
87.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
66.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
64.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
62.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
74.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
74.1%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
72.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
99.8%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) lambda1 lambda1))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
32.0%
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
Compiler

Compiled 6 025 to 1 820 computations (69.8% saved)

regimes153.0ms (1.3%)

Memory
-24.6MiB live, 118.3MiB allocated; 12ms collecting garbage
Counts
69 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) #s(approx (* (* (cos theta) (sin phi1)) (cos phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1)) #s(literal 1 binary64)) phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (-.f64 (*.f64 (neg.f64 delta) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 #s(approx (+ (* -1/6 (* delta delta)) 1) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 delta delta)) #s(literal 1/6 binary64)) (*.f64 delta delta))) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))) lambda1) lambda1 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))) lambda1) lambda1 lambda1))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (cos.f64 theta)) (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (-.f64 (cos.f64 delta) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) delta) delta #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (cos.f64 phi1))) delta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (sin.f64 (+.f64 (acos.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1) (*.f64 lambda1 lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (/.f64 (-.f64 (pow.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (+.f64 (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (acos.f64 (neg.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (pow.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64))) (fma.f64 (*.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (sin.f64 phi1) (cos.f64 delta)) (pow.f64 (cos.f64 delta) #s(literal 2 binary64)))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
Calls

7 calls:

40.0ms
theta
25.0ms
lambda1
18.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
16.0ms
delta
16.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Results
AccuracySegmentsBranch
99.9%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
99.9%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.9%1lambda1
99.9%1phi1
99.9%1phi2
99.9%1delta
99.9%1theta
Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes145.0ms (1.2%)

Memory
-7.7MiB live, 193.8MiB allocated; 42ms collecting garbage
Counts
54 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) #s(approx (* (* (cos theta) (sin phi1)) (cos phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1)) #s(literal 1 binary64)) phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (-.f64 (*.f64 (neg.f64 delta) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 #s(approx (+ (* -1/6 (* delta delta)) 1) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 delta delta)) #s(literal 1/6 binary64)) (*.f64 delta delta))) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64)) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (cos.f64 phi1))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
Calls

7 calls:

30.0ms
delta
26.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
22.0ms
phi1
13.0ms
phi2
13.0ms
theta
Results
AccuracySegmentsBranch
99.8%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
99.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
99.8%1lambda1
99.8%1phi1
99.8%1phi2
99.8%1delta
99.8%1theta
Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes117.0ms (1%)

Memory
19.0MiB live, 163.2MiB allocated; 15ms collecting garbage
Counts
52 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) #s(approx (* (* (cos theta) (sin phi1)) (cos phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1)) #s(literal 1 binary64)) phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) #s(approx (* (sin delta) (cos phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (-.f64 (*.f64 (neg.f64 delta) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1))) delta (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 #s(approx (+ (* -1/6 (* delta delta)) 1) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 delta delta)) #s(literal 1/6 binary64)) (*.f64 delta delta))) (sin.f64 theta)) delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (sin.f64 phi1)))))
#s(approx (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))))) (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1)) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 delta))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
Calls

7 calls:

26.0ms
lambda1
21.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
16.0ms
delta
13.0ms
phi2
12.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Results
AccuracySegmentsBranch
97.1%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
97.1%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
97.1%1lambda1
97.1%1phi1
97.1%1phi2
97.1%1delta
97.1%1theta
Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes92.0ms (0.8%)

Memory
26.1MiB live, 116.0MiB allocated; 11ms collecting garbage
Counts
44 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) #s(approx (* (* (cos theta) (sin phi1)) (cos phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1)) #s(literal 1 binary64)) phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)))))
Calls

7 calls:

22.0ms
theta
15.0ms
lambda1
11.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
11.0ms
phi1
11.0ms
delta
Results
AccuracySegmentsBranch
97.0%1phi2
97.0%1delta
97.0%1theta
97.0%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
97.0%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
97.0%1lambda1
97.0%1phi1
Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes124.0ms (1.1%)

Memory
-27.6MiB live, 117.2MiB allocated; 18ms collecting garbage
Counts
43 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) #s(approx (* (* (cos theta) (sin phi1)) (cos phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1)) #s(literal 1 binary64)) phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (*.f64 phi1 (sin.f64 delta)) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1))) (*.f64 (*.f64 (cos.f64 theta) phi1) (sin.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (fma.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (neg.f64 delta) (cos.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (fma.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 #s(approx (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
Calls

7 calls:

47.0ms
phi2
18.0ms
lambda1
14.0ms
delta
11.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
10.0ms
phi1
Results
AccuracySegmentsBranch
94.6%1delta
94.6%1theta
94.6%1phi1
94.6%1phi2
94.6%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
94.6%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
94.6%1lambda1
Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes64.0ms (0.5%)

Memory
1.3MiB live, 91.7MiB allocated; 10ms collecting garbage
Counts
30 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (neg.f64 (fma.f64 (cos.f64 theta) delta phi1)) phi1 #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (pow.f64 delta #s(literal 3 binary64)) (*.f64 (sin.f64 theta) delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (+ (* (+ (* (cos theta) (* (sin delta) (cos phi1))) (* (cos delta) (sin phi1))) (neg (sin phi1))) (cos delta)) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (fma.f64 (*.f64 (sin.f64 theta) (fma.f64 #s(literal 1/120 binary64) (*.f64 delta delta) #s(literal -1/6 binary64))) (*.f64 delta delta) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (* (cos delta) (sin phi1)) (sin phi1)) (* (* (cos theta) (* (sin delta) (cos phi1))) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (*.f64 (cos.f64 phi1) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) #s(approx (* (* (cos theta) (sin phi1)) (cos phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (cos.f64 phi1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (fma.f64 (fma.f64 (neg.f64 delta) (cos.f64 theta) (*.f64 (-.f64 (*.f64 (neg.f64 delta) (*.f64 (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)) phi1)) #s(literal 1 binary64)) phi1)) phi1 #s(literal 1 binary64))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

7 calls:

12.0ms
lambda1
11.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
8.0ms
phi1
8.0ms
theta
8.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Results
AccuracySegmentsBranch
89.1%1lambda1
89.1%1phi1
89.1%1phi2
89.1%1theta
93.2%3(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
93.2%3(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
93.1%3delta
Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes21.0ms (0.2%)

Memory
35.3MiB live, 35.3MiB allocated; 0ms collecting garbage
Counts
18 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

4 calls:

5.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
5.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
5.0ms
delta
5.0ms
phi2
Results
AccuracySegmentsBranch
89.1%1phi2
89.1%1delta
89.1%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
89.1%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
Compiler

Compiled 66 to 55 computations (16.7% saved)

regimes49.0ms (0.4%)

Memory
-5.2MiB live, 52.2MiB allocated; 3ms collecting garbage
Counts
17 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (sin.f64 delta)))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) #s(approx (+ (* (neg delta) (* (* (cos theta) (sin phi1)) (cos phi1))) (* (cos phi1) (cos phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 theta) phi1) delta))))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

7 calls:

20.0ms
phi2
5.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
5.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
5.0ms
delta
5.0ms
lambda1
Results
AccuracySegmentsBranch
87.3%1theta
87.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
87.3%1lambda1
87.3%1phi1
87.3%1delta
87.3%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
87.3%1phi2
Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes22.0ms (0.2%)

Memory
-14.2MiB live, 33.5MiB allocated; 1ms collecting garbage
Counts
7 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 theta theta) #s(literal 1 binary64)) (sin.f64 delta)) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 delta) theta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (sin.f64 theta) delta) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (+ (* -1/2 (* phi1 phi1)) 1) (* (sin theta) (sin delta))) (*.f64 (*.f64 (fma.f64 (*.f64 delta delta) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 theta))) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

7 calls:

3.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
3.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
2.0ms
phi2
2.0ms
theta
2.0ms
delta
Results
AccuracySegmentsBranch
79.0%3(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
81.3%3delta
78.7%3(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
76.0%2lambda1
74.1%1phi1
74.1%1phi2
81.3%3theta
Compiler

Compiled 69 to 70 computations (-1.4% saved)

regimes3.0ms (0%)

Memory
5.9MiB live, 5.9MiB allocated; 0ms collecting garbage
Counts
2 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

2 calls:

1.0ms
delta
1.0ms
theta
Results
AccuracySegmentsBranch
81.2%3delta
80.7%3theta
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes10.0ms (0.1%)

Memory
-22.4MiB live, 23.7MiB allocated; 1ms collecting garbage
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Calls

7 calls:

3.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
1.0ms
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
1.0ms
phi1
1.0ms
phi2
1.0ms
delta
Results
AccuracySegmentsBranch
72.3%1phi2
72.3%1phi1
72.3%1lambda1
72.3%1(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
72.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
72.3%1theta
72.3%1delta
Compiler

Compiled 69 to 70 computations (-1.4% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
7.023850402077628e-24
3.7025954053829374e-16
0.0ms
-0.1326725888536389
-2.270910604508549e-9
Compiler

Compiled 36 to 31 computations (13.9% saved)

bsearch100.0ms (0.9%)

Memory
16.4MiB live, 121.5MiB allocated; 8ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
42.0ms
4.000550135985638e-22
2.1760593742200088e-16
51.0ms
-945069205626838400.0
-75338.51363189524
Samples
80.0ms304×0valid
Compiler

Compiled 1 955 to 1 266 computations (35.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 65.0ms
ival-sin: 25.0ms (38.2% of total)
ival-cos: 20.0ms (30.6% of total)
ival-mult: 10.0ms (15.3% of total)
ival-asin: 4.0ms (6.1% of total)
ival-add: 3.0ms (4.6% of total)
ival-atan2: 2.0ms (3.1% of total)
ival-sub: 1.0ms (1.5% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch78.0ms (0.7%)

Memory
7.5MiB live, 100.6MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
27.0ms
1.4811758659443514e-15
5.3260295647348715e-14
46.0ms
-3902731.1006577564
-0.10735957863515787
Samples
61.0ms256×0valid
Compiler

Compiled 1 540 to 991 computations (35.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 53.0ms
ival-sin: 20.0ms (38% of total)
ival-cos: 13.0ms (24.7% of total)
ival-mult: 10.0ms (19% of total)
ival-asin: 3.0ms (5.7% of total)
ival-add: 2.0ms (3.8% of total)
ival-atan2: 2.0ms (3.8% of total)
ival-sub: 1.0ms (1.9% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify86.0ms (0.7%)

Memory
-27.4MiB live, 70.5MiB allocated; 5ms collecting garbage
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
0135693
1223693
2415691
31026691
42943690
Stop Event
node limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(if (<=.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #s(literal -3602879701896397/36028797018963968 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #s(literal 6805647338418769/680564733841876926926749214863536422912 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(if (<=.f64 theta #s(literal -3400000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 theta #s(literal 4360718064785109/20282409603651670423947251286016 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (<=.f64 delta #s(literal -45/2 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 2099546306628005/39614081257132168796771975168 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/2 binary64))) (cos.f64 delta) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (fma.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1))) (neg.f64 (sin.f64 phi1)) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (sin.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (pow (sin phi1) 2) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 phi1) (cos.f64 delta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) #s(approx (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))))
(if (<=.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #s(literal -3602879701896397/36028797018963968 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #s(literal 6805647338418769/680564733841876926926749214863536422912 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (or (<=.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #s(literal -3602879701896397/36028797018963968 binary64)) (not (<=.f64 (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))) #s(literal 6805647338418769/680564733841876926926749214863536422912 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (+ (* (- 1/2 (* (cos (* 2 phi1)) 1/2)) (cos delta)) (* (* (* (cos phi1) (sin delta)) (cos theta)) (sin phi1)))) (fma.f64 (cos.f64 (*.f64 #s(literal -2 binary64) phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))
(if (<=.f64 theta #s(literal -3400000 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 theta #s(literal 4360718064785109/20282409603651670423947251286016 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (or (<=.f64 theta #s(literal -3400000 binary64)) (not (<=.f64 theta #s(literal 4360718064785109/20282409603651670423947251286016 binary64)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 delta delta) #s(literal 1 binary64)) (sin.f64 theta)) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(if (<=.f64 delta #s(literal -45/2 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (if (<=.f64 delta #s(literal 2099546306628005/39614081257132168796771975168 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))))
(if (or (<=.f64 delta #s(literal -45/2 binary64)) (not (<=.f64 delta #s(literal 2099546306628005/39614081257132168796771975168 binary64)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))) (+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 theta) delta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (* (sin theta) (sin delta)) (cos phi1)) #s(approx (* (sin theta) (sin delta)) (*.f64 (sin.f64 delta) theta))) #s(approx (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))) (cos.f64 delta))))

derivations437.0ms (3.7%)

Memory
27.3MiB live, 214.5MiB allocated; 13ms collecting garbage
Stop Event
fuel
Compiler

Compiled 693 to 141 computations (79.7% saved)

preprocess93.0ms (0.8%)

Memory
-15.1MiB live, 124.9MiB allocated; 13ms collecting garbage
Remove

(abs phi2)

Compiler

Compiled 1 524 to 380 computations (75.1% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...